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ATARI, JACK A 
UN NOUVEAU COPAIN 



Sicob, 15 heures. C'est Iheure 
ou les hommes d'affaires ont 
deboutonne leurs quatre der- 
niers boutons de gilet el ou ils 
rotent de satisfaction en pensant 
au bon dejeuner ef a la bonne 



J'ai aussi tres chaud mais ce 
nest rien a cote des animateurs 
du stand de Micro-Application 
qui exposent une des vedettes 
de ce salon i ai nomme i mne'a- 
ble Atan 520 ST Le stand est 




affaire qu'ils viennent de 
conclure. L'aeration est detra- 
quee. les ringards qui poireau- 
tent at qui suent sur leurs 
stands deserts regardent passer 
avec envie les beaux, les riches 
et la foule qui se precipite vers 
les stands interessanls 



bourre de cuneux, de hobbyis- 
tes, de re.endeurs et de jouma- 
leux qui ecarquillent les yeux 
devant les demonstrations spec- 
taculaires du Jackintosh. Car il 
est bien la. le monstre devoreur 
de chiftre d'affaires , lecraseurde 
Suite page 9 



LASER ECRABOUILLE 
LES PRIX 




Amstrad a naguere seme une 
jolie pagaille avec son ordina- 
teur au rapport qualite/prix revo- 
lutionnaire. Ce nest rien a cote 
de ce que prepare Video Tech- 
nologie avec son nouveau Laser 
500. Pour moins de 3.000 francs 
eel engin propose 32 Ko de 
Rom avec un basic microsoft 
Ires proche du MSX. 1 28 Ko de 
Ram et un lecteur de disquettes 
5 pouces 1/4. J'ai bien dit moins 
de 3.000 francs et le lecteur de 
disquettes est bien compris 
dans ce prix ! Allez, je vous fais 
un petit descriptif. il ne sera dis- 
ponible qua partir du mois de 
septembre. mais comme il risque 

Suite page 9 



COMMODORE: 

LETS JETER UN COUP 

D'CEIL 

AT THE FRANCE 

Un evenement est passe ma f 
percu au Sicob : la presence 
dun stand nomme fort a propos 
"Commodore", suite a la crea 
tion dune filiate francaise de la 
societe amencame 

Procep est done dechu de son 

tilre d'importateur exclusif de 
Commodore. Pas sur la touche 
cependant. du moins pas en- 
core, puisque c'est a cette so- 
ciele qu'incombera la tache de 
lancer le PC 10 et le PC 20. les 
deux nouveaux compatibles 
IBM C'est par conlre Commo- | 
dore France qui lancera le Plus |jj| 
4 sur le marche francais, 
Procep est done condamne ane " 
devenir quun distnbuteur — 
comme les autres. puisque lex- ^b 
clusivite de cette distribution ■ 
(ardue. les PC ne son! pas un am 

Suite page 9 A COMMODORE PLUS 4 




THOMSON: 

UORDINATEUR 

INVISIBLE 



Si vous etes aile au Sicob, vous 
avez peut-etre remarque que 
run des stands de Thomson 
etait hermetiquement clos. Et 
pour cause : il renfermait le 
T09. qui. |e vous le rappelle 
n existe pas. Enfin. nexistail pas 



f^bs*-^ 



mois dernier Mais qui 
n'existe toujours pas. sauf qu'il 
etait au Sicob C'est un peu 
complique. mais rassurez-vous 
je suis aussi paume que vous 
Le T09. done On sail peu de 
choses : il sera lance fin Sep- 
tembre dans les boutiques mais 
les |ournaux specialises pourronl 
(aire un banc d'essai en Jum II 



coutera moins de 10.000 francs. 
Et il sera compatible avec ses 
petits freres. 

Dans le bunker gardes a I'en- 
tree. impossible de rentrer avec 
un appareil photo, on me confis- 
que le mien Deux appareils 
sonl la. et une floppee d'ecrans 
qui annoncent Thomson T09. 
Ram 128K. 1-Traitement de 
textes. A-Autochargement. 2- 
Basic Microsoft 2 6. 3-Gestion 
de fichiers. 4-Tableur". Je de- 
mande si je peux appuyer sur 
nimporte quelle touche le di- 
recleur de Thomson Informati- 
que me ril au nez comme si 
j avais prononce une incon- 
gruite. Apparement. il n'y a pas 
encore de Rom 

II y a une souris (beige avec 
deux boutons jaunes) qui traine 
negligemment a cote de lengin 
lui-meme : clavier detachable 
avec pave numenque. curseurs 
Suite page 9 



APPLE : LES POMMES 
NOUS PRENNENT 
POUR DES POIRES 




J'AI LANSAY 
LA PREMIERE PIERRE 

Le Lansay 64 baisse de 40 %. Solde page 10. 

GASSEE AG ACE 

Le PDG d'Apple France va t-il abandonner ses 150.000 
fils spirituels ? Reponse page 10. 

ALICE, C'ESTFINI 

Matra abandonne la fabrication de ses petites boftes 
rouges. Voir page 10. 

FAIS-MOI UN ORIC 
DANS LE DOS 

Et toujours des rebondissements dans la saga orictenne. 
Roman page 10. 

FUTURSYS : 

LA MACHINE DEL' ELITE 

ESTAVANCEE 

Le premier ordinateur grosse tete ref lechit page 1 0. 

AMSTRAD: 
EN VENTE PARTOUT 

Le nouveau 664 est en bas de chez vous el a ta page 10. 



OEULIGNEURS 
Les faineants , page 16 . 



CINOCHE 
TELOCHE 



page 
14 el IS . 



FORMATION A L ASSEMBLEUR 

Le prof et I'amateur eclair* vous attendent a ta page 19 



BIDOUILLE GRENOUILLE 

Ou comment tricher, pirater, modifier, tratiquer, magouiller. 
bidouiller et grenouiller avec les togiciels du monde entier. 
Mais dans la legalite. au moins ? Of course, mon general I 
Lire page 9. 



CONCOURS PERMANENTS 

Votre programme, non content de vous rapporter 1.000 
francs par page publiee. peut vous rapporter 20.000 
francs cheque mois ou un voyage en Californie pour deux 
cheque trimestre. Reglement en pege interieure. 



Pde^Bogramme^ou^Jqtr^ordinaSf 

AMSTRAD . APPLE He et He . CANON X-07 . CASIO FX 702-P. 

COMMODORE 64 ET VIC 20 . EXELVISION EXL 100 . HECTOR HR . 

MSX et compatibles . ORIC 1 ET ATMOS . SINCLAIR ZX 81 ET SPECTRUM. 

V^SHARP PC 1500 . TEXAS TI-99/4 A. THOMSON TQ7, TO7/70, ET MQ5. 



N°83 



Allemagne 3,50 DM - Belgique 77 Frs • Canada 2,50 S - Luxembourg 74 Frs ■ Suisse 3.30 Frs ■ 



10F 



STRIP 



THOMSON T07, T07, MO 5 






Apres cela. qui osera se plamdre du cote austere de 
linformatique. Tiens. jen bave sur mon clavier 
(SLURP !..). 

Patrick LAHBIB 



Mode d'emptoi : 

Les regies honleuses el revollanles sont dans ie programme 
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to PEN • ••••••••••••••••••••••Oiffir-fif 

£8 PER ••• STRIP 21 «•« 

39 FEH «•• PATRICK LAHBIB - 1985 ••• 
48 PEH •••••••••••••••••••••••••••••••« 

58 CLEAR, ,91 

b8 rEFGRf90>-0. 0.0.0,6. e,e.3i 

~8 GOSUB4680 

90 PEI1 • •••••»•••♦••*«»*■»••**•••••••••• 

98 PEH ••• HUSIOUES ••• 

108 REM «••«•«»• < uiuMMKt 

lie Din HUSf 22> 

128 FOP I-0TO22 

138 REAOHUSf I) 

148 NEXT I 

150 AIRf-'04L18S0REL36RELl8HIO3SIL36SILl 

804RED003SIL6L36SO* 

160 AIR2»- , L2e04HiniL38HILieDOL28LALAL38 

LAL10LAL20SOFAniREL48HIDOL2eHIHIL3eHIL18 

DOL28LALAL30LAL10LAL2eSOFAHlREDO" 

i?e ren ••**••••••••»••■*••••••«»•••■•> 

188 REH •■• PRESENTATION ECRAN *•• 
190 RER ••••«••••••••*■••••••■••••••#•• 

288 P0T=6:8A=6=FLrtG=6 

218 CLS:SCREEH,3,8:L0CATE8.8,6 

228 B0X'14,5)-(176,l76),5 

238 80X(13,4>-(177,177>,5 

248 B0XF(27,22)-(29, I )CHR«( 127), 6 

258 B0XF(34,22)-(36, I >CHR«< 127), 6 

268 FOR L=l TO 21 

270 PSET(26,L)GRf 98),8,3:PSET(33,L>CRf< 

98), 8,3 

280 NEXTL 

298 C0L0R8,3:LOCATE25,17!PRINT-5-iLOCATE 

32,17IPRINT"5- 

388 L0CATE24, 12: PRINT- 18*: L0CATE31, 12! PR 

INT-18" 

318 LOCATE24,7:PRINTMS':L0CATE3i,7iPRIN 

T-I5- 

328 LOCATE24,HPRINT-2l*tL0CATE31, 1 = PRIN 

T"2i" 

338 L0CATE24,1 SPRINT '21 *iL0CATE31,i:PRIN 

T"21" 

348 B0XU6, 10J-<18,16)'»*,4,6 

35B COLORS, 7 

368 LOCATEll.lUPRINT* 

378 L0CATEI1,12:PRINT" STRIP ' 

388 L0CATE11,13:PRINT" 

390 L0CATE11,14:PRINT' 2 1 - 

400 L0CATE11,15:PRINT"" 

410 GOSUB 1268:CDSUB388e 

420 PLAVLI405RE04LASIFAtLAHIFAtRE- 

438 REH NOn DU JOUEUR 

448 L0CATE2,23,UC0L0R8,3:lNPUT-eUEL EST 

VOTRE PRENQH'JNOflf 
45B NOMf-LFFTHNOM' , 9 :■ 
468 LIN£(0,23>-(38,23>" -,,3 
470 PRINTCHRf 26) 
488 COSUB 45381 COLOR0 
490 L0CATE12,3:PRINT*BONJ0UR- 
588 L0CATE12,4:PRINTN0Hf 
518 FORT«lTO1000:NEXTT!PLAYAIR(:BOXF(ie, 
1>-(2I,6>" ",,3 
528 REN ••*•••••■•••••*•••«■••■•■••■■■* 

S38 REN ••• DEROULEHENT DU JEU ••• 

548 REN ••••••••■•••••••••■■••••*i»««»i 

558 NC=8:TTALl-8tTTAL2«8!TTAL-eJLINE(8,2 

3>-<38,23)CHR$a27>,3 

568 B0XF(27,22>-(29, 1 >CHRf( 127),6 

578 B0XF(34,22>-(36,1)CHR«(127>,6 

5BB REN NOUVEAU COUP 

598 L0CATE2,23!C0L0R8,3:PRINT-CARTE -> " 
; :COLOR7,0: PRINT *C*;:COLOR0, 3: PRINT* S 
TOP -> •j:COLOR7,0:PRlNT-S , ;!COLOR8,3:PR 
INT* ABANDON -> "J :C0LOR7,8:PRINT-A* 

688 REN CHOIX DU JOUEUR 

618 Af-INPUTf l> 

620 IF A«-*5* THEN IF NC*8 THEN 618 ELSE 

828 
638 IF At-'A* THEN LINE<0,23)-(3B,23)CHR 
f 127>,3iG0T01I66 
640 IF Af >*C" THEN 618 

650 REH TIRACE D'UNE CARTE 

660 Xl = INTiRND»I8 ■ ♦ I : TTAL = TT«L*X1 : NC-NC * 

670 TTAL2-TTAL2*INT(RHD*10)*1 

6B8 IF TTAL>21 THEN 768 

698 REN -- AFFICHACE RESULTAT JOUEUR — 

788 TOR J=0 TO Xl-1 

710 BQXF(34,22-TTALl)-<36,22-TTALl-J)CHR 

*<127> f 1 

720 PLAY HUSf(J) 

730 NEXT J 

740 TTAL1-TTAL 

750 GOTO 590 

760 FOR J-0 TO ABSC21-TTALI) 

778 REH — TOTAL JOUEUR DEPASSE 21 — 

788 B0XF(34,22-TTALl>-(36,22-TTALl-J>CHR 

S<127>,1 

798 PLAY HUSf J) 

888 NEXT J 

818 F0RT-1T028:8EEP:NEXTT 

828 LINE(8,23>-(38,23)CHRf<127),3 

838 REN PETITE HACOUILLE 

840 IF TTAD21 THEN 888 

858 IF RNDIB<POr-l THEM 000 

860 IF NC>2 THEN HAX-22 ELSE HAX=NCfl8*I 

878 TTAL2-TTAL1*INT(RND*KHAX-TTAL1>) 

880 IF TTAL2>21 THEN BO-2! ELSE B0=TTAL2 

-1 

890 REN - AFFICHACE RESULTAT GERTRUDE - 

908 FOR J-8TOB0 

918 B0XF(27,22)-(29,22-J)CHRf 127), I 

928 PLAY HUSf(J> 

938 NEXTJ 

948 IF BO-21 THEN FORT-1 TO 28:BEEP:NEXT 

T 

958 REN RESULTATS DU COUP 

968 LOCATE5,23:COLOP0,3 

970 IF TTAL>21 THEN IF TTAL2/21 THEN PRI 
NT-ECALITE - : FORT« 1T0788: NEXT T:PLAYAIRf: 
G0TO558 ELSEPRINT-J'AI CACNE '-:PQT=POT+ 
l:COTO 1B28 

980 IF TTAL2>21 THEN PRINT'VOUS AVE2 CAC 
NE '-:P0T=P0T-l:C0TO 1828 
998 01=21-TTAL:fi2=21-TTAL2 
1808 IF Q1-Q2 THEN PRINT'EGAL ITE": FOPT= 1 
T078B:NEXTT:PLAYAIP»:C0T0558 
1818 IF 0K02 THEN PRINT'VOUS AVE? GAGNE 
'*:POT=POT-| ELSE PRINT-J'AI CACNE '-:P 
OT-POTH 
1828 ON POT GOSUB 2228,3398.3528.2958.24 



38 , 3888. 4 168 r 4 160, 4 160, 4 160. 4 160 

1838 IF FLAC-1 THEN 1188 

1040 FDRT-1T058:NEXTT 

1858 PLAYAIRS 

1060 FOR T-1T0388:NEXTT 

1878 BOXF(10,1)-<21,6>- -,.3 

1888 BA-POT 

1090 C0T0558 

1108 LINE(6,23>-( 38.23 >CHRf 127 >. 3 

1118 REH PAPTIE TERHINEE 

1128 LOCATE2,23:COLOR8,3:PRINT-VOULEZ VO 

US RECOHNENCER "> '0/N)" 

1138 PEPf-INPUTf 1) 

1148 IF REPf-"0 - THEN 178 

1150 IF REPfO'N* THEN LINE' 8.23>-(38,23 

KHRfl27),3iG0TO 1136 

1168 REN FIN DU JEU 

1178 B0XF(ie,l>-<21,6>." m ,,3 

1180 GOSUB 4530:COLOR0 

1198 L0CATE12,3:PRINT'D0HHAGE ■■ 

1200 L0CATE12,4:PRINT"AU REVOIR" 

1218 LOCATE12,5=PRlNTN0Hf 

1228 F0RT=lT0888sNEXTT 

1238 PLAY-03L24RELI2REREL24RE4L48REL24FA 

•L48S0* 

1248 FORT-1TO1000:NEXTT 

1250 CLS:SCREEN4,6,6:LOCATE0,8,i:END 

1260 REH •••••••■•••••■•••••>••*•<•■••• 

1270 REH •• DEFINITION PES CARACTERS •• 
1288 REH •• GRAPHIOUES DE DEPART •• 
1290 REN ••••••••***••*•••••••••*•*•*«• 

1388 DEFGRf 0;>-0, 1 . 3, 7, 15, 31 , 31, 31 

1310 DEFCRf! (-120,254,255.255,255.255.2 

55,255 

1320 DEFGR>(2)-0,0,0, 128, 192,224,224,248 

1330 DEFGRf«3>-63.62,68.68,68,l24,112, 11 

2 

1340 DEFCR*(4)-248,248,112, 1 12, 1 12. 48, 48 

,112 

1358 DEFGR«< 6 )>48, 0,24, 37, 25, 131,127,3 

1360 DEFCR»<7)-248, 248, 240, 248,248, 248, 2 

48,248 

1370 DEFGRt(8)-8,8,8,8,8,l,l,2 

1388 DEFGR*(9)=3I, 32, 64,128, 128,8, 0,8 

1398 DEFGR*<12)=B,8,e,e,e,0, 192,32 

1400 DEFGR»(I3)»2,2,4, 4, 4,4,8,8 

1418 DEFCR<a7)-8,8,8,8, 128,64,32,16 

1420 DEFGR«(24)»8, 8,4.2, 138, 138,4,8 

1 438 DEFGRX 25 )=32, 32, 33, 65, 65, 66, 66, 66 

1448 DEFGR»(29>«4, 24, 96, 128,3,4,24,32 

1458 DEFCR*( 30 )'8, 48, 64, 128, 8, 8, 8, 



1468 DEFGRK31 
1478 DEFCRX34: 
1488 DEFCR*(3S: 
1498 DEFCR*(36 
1588 DEFCK*C37 
1518 DEFCR*<38 
1520 DEFCR*(39 
63 

1538 DEFCK*<48 
1540 DEFCRX41! 
1558 DEFC«*<42 
1568 DEFCRf(43: 
1570 DEFCRX44: 
1588 PEFCRH45 
1598 DEFCRt<46)< 
16B8 DEFCR*C47! 
128 

1618 DEFCR*(48: 
1628 PEFCR*<49. 
1630 DEFGRX50 
1648 DEFCRX51: 
1658 DEFCR*<52 



123, 128 

1668 0EFCRX53: 

1670 DEFCRX54 

1688 DEFCRX55 

1690 DEFCR«C56: 

1700 DEFCRt(57 

1710 DEFCR«(58 

1720 DEFCRK59 

1738 E»EFCR*<60: 

1740 DEFCRH6I 

1750 DEFCR*(62: 

1760 DEFCR»(63: 

1770 DEFCRX64 

1780 DEFCRX65: 

1790 DEFGR*C66: 

1808 D£FCftf(67)' 

1318 DEFGR*(68)^ 



1348 DEFCR*(72; 

1858 DEFCR«<73)i 

1868 DEFGR«<74 

1870 DEFGRt<75) 

1890 DEFCR«<76 



-66, 66, 66, 66, 66, 66. 66, 66 

-8, 7, 248, 64, 32, 32,248, 16 

•128,8,8,0,0,0,0,0 

B, 68, 68, 68, 68, 60, 68 
16,16,32,32,64,64 

■16,8,8,8,4,4,4,2 

-66,66,65,65,129, 129,129, 

,128,128,8,8,8,8 
8, 8, 8, 8,8.8, B, 8 
2,2.2,2,2,2,2,2 
132,116,8,8,16,16,32,32 
0,0,0,0,0,8,8,0 
8,8,0,0,0,8,0,8 
2,2,2,2,2,2,2,2 
64, 64, 64, 64, 128, 128, 128, 

0,0,0,0,0,0,0,8 

8.8.0.8.8.8.8.8 
8,0,0,0,0,0,0,0 
2,2,2,2,2,2,2,2 

"8. 128. 128. 129, 



28, 



8,8,8,8,8,8,8,8 

0,0,0,0,0,0,0,8 

2,2,4,4,4,4,4,4 

1,1,2,2,3,2,2,4 

8,8,8,8,248,15,4,4 

8,0,0,7,252,4,4,4 

4,4,12,244,4,4,4,4 

4,8,8,8,16,16,16,16 

4,4,8,8,8,16,16,32 

4,4,4,4,4,4,4,4 

4,4,4,4,4,4,4,4 

1 6, 1 6, 32, 32, 32, 33, 33, 65 

32, 32, 64, 128, 128,0, 0, 

4,4,4,4,4,4,4,2 

8,8,8,16,16,16,16,16 

66, 66, 66, 68, 68, 68, 1 24, 25 



.2,2,4,4,8, 16 

18,18,16,34,36,84,84 
2,2,3,3,1,0,0,0 
16, 8, 8, 4, 1 32, 1 30, 65, 67 
16,63,124,133,134, 120,0, 



-108,216, 152,8,0,0,0,0 

-67,53,45,43,9,7,0,0 

-8,0,8,8,8,192,63,0 

-0,0,0,0,0,3,252,0 

-0,0,0,0,0,8.8,8 

-8.8,8,8, B, 8, 8,8 

-8,0,0,0,0,0,0,0 

-8,8,8.238,8,68,68,0 



1890 DEFGR«<77> 

1988 DEFCRX7S)- 

1910 DEFCR«(82) 

1928 DEFCR(<83) 

1930 DEFCR*<84>> 

1940 DEFCRH85) 

1958 DEFCft»(B6) 

1960 DEFCRK87) 

1978 RETURN 

I960 REH »•*•••••••*■••«■■••■■•••:•••■•■ 

1990 REN ••••• DESSIN DE CERTRUDE ••••• 

2880 REH MIMMMMMIIHI ■■••<■ 

2010 COLOR0, 3 

2028 L0CATE6, 3:PRINTGR*v8>; CR«( 1 >; CR«f 2> 

2030 L0CATE6,4!PPINTGP*(3;-;GR*f87>;GR*i4 

2040 L0CATE6,5:PRINTGR)«5>;GRX6);CR«<7> 

2858 L0CATE4,6:PRINTCRt(8);GR((9);GRS<79 

):CR*a0>;CRf(ll>;CRS(l2) 

2060 LDCATE4,7:PRINTGR((13):CR*> 14 >;CRC 

80>;GR«(81);CRI(15);GR<<16>;GRt<17> 

2870 L0CATE4,8!PRINTCR*(ia);GR«(19),-CPt* 

20j;CRS>21);GRf(22);GRS<23>:CRt<24i 

2088 L0CATE4,9:PRINTGRt<25>:GRtc26';' "1 

GRS>27);CRS(28)iCR*t29);GRS<.30> 

2898 L0CATE4,18:PPINTCRC<31 >;CR*< 32 •; GR» 

C71 ■;GR*<33);GR«f34);GRf<35'- 

1188 L0CATE4,li:PRINTGR«<36>;GRf 3^ ;GRt 

d4<;GRt(85);GRS(38' 
2110 L0CATE4, 12:PRINTGRf'39';GR*'40 ;CR* 
.41 );CRt(86);CRS<42^ 



2120 L0CATE4,13=PRINTGR*(43)f * ';CR»<44) 

;CR*(45>;CRS(46) 

2130 L0CATE4, 14: PRINTCR«(47);GR«<48>!GR< 

(49);CR*(5B);CR*<51) 

2140 1_0CATE4,15:PR!NTGR*<52)JGR*<53)S" * 

;GRS<54>JCR»<55) 

2158 LOCATE3,16:PPINTGRi(56>;CR»*57>;GR« 

(82);CR«<83);CR«'58);GR«<59) 

2160 L0CATE3,17:PRINTCRK66>;GR«(61)f * 

-;GRK62);CRS<63) 

2170 L0CATE3, l8:PRINTCRf (64); GR»(65> ; * 

-;CRS(66);OS(67) 

2180 L0CATE3, I9:PRIRTCR»<68);* ';GRS<6 

9>JCR«<70) 

2190 L0CATE2,28:PRINTCR*(72);CR*<73);* 

•;CRft74>jCR*C75> 
2200 L0CATE2,2i:PRINTGR»(76);CR*(77)f * 

•;CR*(78) 
2218 RETURN 
2228 REN ••••••••••••■••■•••••■••■••t*t 

2230 REN »•• GERTRUDE... «t 

2248 REH ••»•*•»•*•>••>••••••■•*■■•*•• 

2250 REN ENLEVE SON SLIP 

2268 DEFGRf C37>=8, 8, 16.16,32,32.64,64 

2270 DEFCR*<38>=I6,8,9,8,4,4,4,2 

2288 DEFCRK4D-8, 8, 15,7,7,3,6,5 

2290 DEFCRt(84)-0,0. 0,8,8.8,8,8 

2300 DEFGR»(B5)-B,0,8.e.0,0,B,e 

2318 DEFCRS(86)-8,8,192,128, 128,8,8,0 

2328 GOSU82000 

2330 FORT-1TO100:NEXTT:PLAYA1R* 

2348 FORT=1TO180:NEXTT 

2350 REN — ...ET SE RETPOUVE NUE --- 

2360 COSUB 453B 

2378 L0CATE13,2:PRINT-AL0RS<* 

2300 L0CATE12,3:PRINT"0U'EST-CE - 

2390 L0CATE13,4:PRINT"8U*0N- 

24M L0CATE12,5:PRINT"ATTEND... P 

2418 PLAYAIR2f:FLAG-l 

2420 RETURN 

2430 REH ENLEVE SON CHENISIER — 

2448 IF POT>BA THEN 2670 

2450 DEFCR«(5>«I20, 124,124,254,255,254,2 

52,248 

2460 DEFGR»UB>=3, 1,1, 1,1,2,2,2 

2478 DEFGRf (11 )=248, 240, 240,96,48,6, 1,0 

2488 DEFCRS<14)=0,0,0,33,35,39,47,47 

2490 DEFGRf . I5;=0. 8.8.8.6. 14. 177, 138 

2500 DEFCR*(16)-8, 12,2, 1,0,0,128,64 

2518 DEFGRf 18 ' = 8,8, 16, 16, 16. 16. 16, 16 

2528 DEFCR»<19)«95, 95, 79, 79,132, 132,132, 

132 

2538 DEFCRS<20>-248, 248, 248,255, 8, 8,6,0 

2440 IF POT>BA THEN 2678 

2556 DCFCR*<22>-196,246,248,224,32,32,64 

,64 

2560 DEFGR«(23)-32,24. 12,3,0,0, 1,2 

2576 DEFCRS(26>-132, 132,4,2,2,2,2,2 

2560 DEFCR«(27>-8,0,0, 0,7,8,8,8 

2590 DEFCR*C28)-128, 126, 129, 128, 131. 126, 

6,6 

2606 DErGR*<32)-4,4,7,4,4,4,ll,8 

2618 DEFGRf 33 >=8, 9, 255, 32,32,32,255,0 

2620 DEFGRf 79)=32, 64.64,64,64,64, 64,64 

2636 DEFGRf 88>=64, 64, 64, 192,224,248.248 

.248 

2648 DEFGRf 81 >=4, 4, 4, 30, 63, 127,255,255 

2650 COT 02 930 

2666 REN REHET SA JUPE 

2678 DEFGRf 32)-4, 4,7,4, 4,4, 11, 8 

2688 DEFGRf 33 )=8, 8,255, 32, 32, 32,255,0 

2696 DEFGRf 71 > = 6, 8, 255, 2, 2, 2,255,6 

2780 DEFGRf 34 )-0, 7,246,64,32, 32,240, 16 

2716 DEFGR«37)-8,8, 16, 16,32,32,64,64 

2726 DEFCRf 38>*16,8, 8,8,4,4,4,2 

2738 DEFCRf 40)-64, 128, 128, 128,0,0,0,0 

2740 DEFCRf 4I)«6,0,0,8,e, 8,8,8 

2756 DEFCRf 44)-8, 6,0,0,0,0,0,0 

2760 DEFCRf 45)-8,8, 6, 8,8,8. 8,0 

2770 DEFCRf 46>-2, 2,2,2, 2,2, 2,2 

2788 DEFCRf (48)-8,6, 0,0,0, 6,0,0 

2790 DEFCRf 49)-0, 0,0, 0,0, 0.8, 8 

2800 DEFCRf 50)»8, 8, 8,8,8,0,6, 8 

2818 DEFGRf (52)-128. 129, 128, 128, 128, 128, 

129,128 

2828 DEFGRf 53>-6, 6,8,8,6,0,0,0 

2830 DEFGRf 54)-0, 8,6,0, 0,0,0,0 

2840 DEFGRf(56)-l, 1,2,2,3,2,2,4 

2858 DEFGRf ( 57 )-6, 8, 0, 8, 240, 15,4, 4 

£860 DEFGRf58)=8, 8,8, 7,252,4,4,4 

2878 DEFGRf 59)=4. 4, 12,244,4,4,4,4 

2880 DEFCRf < 82 )=8, 8, 8, 8, 6, 192, 63. 8 

2890 DEFGRf ( 83 )-8, 8, 8, 6,8,3,252,8 

2988 DEFGRf 84)-8, 8,0. 6,0, 0,0,0 

2910 DEFCRf<85>=8, 8. 8.8.0,0,8,0 

2926 DEFGRf 86>=8, 6,6, 6,6,0,6,6 

2930 COSUB 2008 

2946 RETURN 

2950 REH ENLEVE SA JUPE 

2960 IF POT>BA THEN 3250 

2976 DEFGRf 32)-4,4,4,4,4,4,7,7 

2988 DEFGRf 33 )-8, 8, 15.8,8,8,255.255 

2990 DEFGRf 34 )-0, 7,249.64, 32. 32.240.240 

3666 DEFCRf (37 )-U, 11, 18,18,63,37,68,68 

3616 DEFGRf 39)- 16, 9,9,8,252,4,4,2 

3826 DEFGRf (48)-68. 132,136,136,8.68, 138, 

I 




3056 DEFGRf 45 >=20. 32, 192, 128,128,128,12 

3666 DEFGRf 46 '-194.50, 14.2,2,2,2,2 

3676 DEFGRf 48>=8,e,l, 1.2,4,4.8 

3686 DEFGRf 49>=I2S> 128.8.6,8.6.6,8 

3698 DEFGRf 58 >=64, 64. 64,32, 32,32, 16, 16 

3160 DEFCRf 52)=128. 128.128, 128,128,129. 

129. 129 

3110 DEFCRf 53 )=32, 32. 64. 128, 128,8. 8.8 

3128 DEFCRf54) = 16, 16, 16, 16. 16,8,8,4 

3130 DEFGPf 56-=l. 1,2.2.2,2.2.4 

7140 DEFGRf 57>=1,2,2,2.4,4.4.4 

7150 DEFGRf (58 -=4,4.4.4,4.4.4.4 

7160 DEFGRf 59'=4,4.4.4.4.4.4,4 

3!~0 DEFGPf 71 -=0,0.8.3.3.8.255.255 

7180 DEFGPf 82 ' = 6-8-6.6.8.0. 8.0 

7190 DEFGRf 83>=0. 0.0. 0.0. 6. 0.0 

7i08 DEFGRf 84-= 192. 128.6.8.255,255. 127. 

7110 DEFGPf 85 "62. 22. 9.8.255. 249. 232. 23 



7i£8 
7t'7* 
7140 
3250 

--!»» 
727 8 

7i9t' 



=228. 



132, 132,4,2,2, 



DEFGRf 86 >' 

G0T03378 

REH - REHET SON PORTE- JARETELLES 

DEFGPf 32 )«4. 4,4, 4,4,4, 7,7 

DEFGRf ( 33 )-9, 8. 15, 0,8, 8. 255, 255 

DEFGPf (34 )=8. 7.248.64. 32, 32.240,246 

DEFGRf 37.-11. 11, 18. 18,63.37,68,69 

DEFCRf 48 «»68, 132, 136. 136,8.68,138, 

' DEFCRf 44)= 137, 73, 48, 32. 32, 64, 64, 12 



3310 DEFGRf < 45 )=28. 32, 192,128,128,128,12 

8,128 

3328 DEFGRf (46)- 194, 50, 14, 2, 2, 2, 2, 2 

3338 DEFCRf ( 71 )-6, 6, 8. 3, 3, 8, 255, 255 

3346 DEFGRfi 84. = 192, 126,6,8.255.255,127, 

63 

3350 DEFGRf 85 )=62, 28, 6. 8,255,248, 232. 23 

2 

3360 DEFGRf 96>=228, 196, 132,132,4,2,2,' 

3378 COSUB2860 

3386 RETURN 

3396 REN — ENLEVE SON SOUTIEN-GORCE - 

3460 DEFGRf(10)-3,l, 0,0,0,8. 6.8 

3410 DEFCRf ( 14 >-0, 8, 8, 24, 24, 24, 48, 48 

3428 DEFGRf i5)=e,e.e,e,e. 14,49,2 

3438 DEFGRt(19)=83,83,72,68,71,132,l32, 1 



3£ 



3460 DEFGRf (22 )-68, 136, 16, 32, 32, 32,64,64 

3478 DEFGPf 79)-0,8, 0,0,0,0,6, 8 

3488 DEFGRf 80>-8, 6,6,0,0,8,8,0 

3490 DEFGRf<81)-e,6, 8,6,8,6,6,6 

3560 COSU62008 

3518 RETURN 

3520 REN - ENLEVE SON PORTE-JARETELLES- 

3530 IF POT>BA THEN 3680 

3548 DEFCRf(32)-4,4,4 r 4,4,4,4,4 

3550 DEFGRf 33)»8, 8, 15,0,6,6,8,6 

3560 DEFGRf(34)-0,7,248,64,32,32, 16,16 

3570 DEFGRf (37 )=8, 8, 16, 16,63, 32, 64, 64 

3588 DEFGRf 40)=64, 128, 128, 128.8,8,6,6 

3598 DEFCRf 44 )-9, 9, 16,16,32,64,64, 128 

3668 DEFCRf (45)*0, 0, 128, 126, 128, 128, 128, 

128 

3610 DEFCRf(46)«2,2,2,2,2,2,2,2 

3620 DEFGRf 71)-B,6, 6,3, 3,0,8, 8 

3636 DEFCRf (84 >=e, 8, 8, 8, 255, 255, 127, 63 

3640 DEFCRt(85)-8, 0,0,0, 255, 240,224,224 

3656 DEFGRf (86)-224, 192, 128, 128,6,8,6,8 

3660 GOTO 37 B0 

3560 DEFGRf 34 )»0, 7 1 249 1 64, 32, 32, J_6. 16 

3680 DEFCRf (16>-3, 1,1. uWzlz.Z 

3690 DEFCRf 14>-0, 0,0, 33, 35, 39,47,47 

3766 DEFGRf 15>-0, 0,8, 8.0, 14,177, 130 

3710 DEFCRf (19)-95, 95,79, 79, 132, 132, 132, 

132 

3720 DEFCRf (20>-248, 248, 248. 255, 6, », 9. e 

3736 DEFCRf(21)-255, 255. 255,255,0,0, 6,0 

3746 DEFCRf 22 )-196, 248, 240,224, 32,32,64 

,64 

3758 DEFCRf (79J-32, 64, 64, 64, 64, 64, 64, 64 

3766 DEFGRf (88)=64, 64, 64, 192,224,248,248 

,248 

3776 DEFCRf (81 )-4, 4, 4, 30, 63, 127,255,255 

3780 GOSUB2000 

3790 RETURN 

3880 REH REHET SON CHENISIER 

3816 IF P0T(8A THEN 4070 

3828 DEFCRf ( 5 )■ 120, 124,124,254,255,254,2 

52,244 

3839 DEFGRf(10>-3,1.6,e,0,0. 1,1 

3840 DEFCRf { 11 )-248. 246,246, 96, 176,166,3 
3.32 

3858 DEFGRf!4>-0,0,0,0,0,0,e.8 

3860 DEFCRf (15)-32, 32. 64, 64, 64, 192, 0,0 

3870 DEFGRf ( 16 )-8, 12,3,5,5,9,9,18 

3886 DEFCRf ( 18 )-24, 22, 17, 48, 14. 17, 16, 16 

3896 DEFGRf 19 )-0, 0,240, 16,48,268,144. 14 

4 

3900 DEFCRf(26)=e, 8, 6.8,8,8.6,6 
3918 DEFCRf (21 >=32, 32, 32,64. 64, 64, 64, 64 
3928 DEFGRf 22>-6, 1.2.2,4,4,8,8 
3938 DEFGRf<23>"242. 36,66,2, 1,6, 1,2 
3940 DEFCRf 26) = 144, 144, 16, 16,8,9, 9,8 
3950 DEFCRf (27)=64, 64. 64. 128, 135,136, 136 
,136 

3960 DEFCRf (28)= 16, 16. 16, 16. 131, 126, 0,8 
3970 DEFGRt(32)=8,4,7.4,4,4,ll,8 
3980 DEFGPf 33 >-136. 136,255.32,32,32,255 
,8 

3990 DEFGRf 71 >=8. 0.255. 2,2. 2.255, 6 
4668 DEFGRf 79 )=40, 40. 40. 46. 40, 36. 36, 36 
"" DEFGRf 80)=36. 34. 34, 34. 63.0.0,0 
DEFGRt(81)=2,2,2,4,8, 159.144,88 
GOSU82O08:RETURN 

REH •■•*»••*••**>■■••*■•■*(*■*•.«. 
REH «•* LE JOUEUR... •«• 
REH *•••«•••••• «■■■■■. •«•••« ■*.«.. 

REH REHET SON PULL 

COSUB 4538 

L0CATE12.I:PPINT-H0N CHER- 
LOCATED, 2 t PRI NTNONf 
L0CATE12,3=PRINT'REHETTEZ* 
LOCATE 13, 4: PR INT 'VOTRE " 
L0CATE12. 5s PRINT -PULLOVER- 
FORT- 1 TO300: NEXTT : RETURN 
RETURN 
GOSUB 4530 

COLORS, 3: LOCATE 1 2, 1 : PR I NT 'HON CHER- 
LOCATED, 2: PRINTNOHf 
L0CATE12,3 
IF POTOA THEN 4456 

REN SE DESHABILLE 

PRINT-ENLEVEZ" 

LOCATE 13, 4: PRINT" VOTRE* 

LOCATE 12, 5 

ON POT-6 GOTO 4266,4270,4289,4296,4 



4i<7(.l 

40)48 
4«9i 
4K8 

4«70 
4M&0 

«09f 

-<iee 

■4 110 

41M 
4131 

4140 

-156 
4160 

4170 

4190 

4190 

4208 

4210 

4220 

4230 

4240 

4258 

30B 

«26« 

4270 

4280 

4290 

4380 

4310 

4326 



PR1NTPULLOVEP*:COTO 4438 
PRINT-CHEHISE-sCOTO 4438 
PRINfP»MTALON':COTO 4430 
PRINT-TEE-SHIRT*:GOTO 4430 
PRINT-SLIP' 
FORT=1TO100:NEXTT 
PLAY AIRf 



Suite paged 



LABYBOULE 



Chouette ! Petit listing et jeu captivant ou un labyrinthe 
piege vous fera perdre la boule. 

Pierre Henri BERSANI 

Mode d emploi : 

Vous devez diriger une boule dans une fabyrmlhe en 3D truffe de 
pieges et parvenir a I'arrivee avanl la (in du temps imparti. Une ex- 
tensionde SKoel beaucoupdedextente seronl necessaires au fonc- 
tionnement de ce jeu qui comporte 5 lableaux. Indications mcluses. 




edito 



i reii ••••••••••• 

2 REII LflBVBOULE 

3 REII VIC - 20 

4 REN P.H.BERSANI 

5 REII ■■•«•■••«■■ 

IB P0KE36979. 156 PRINTCMRiO; POKE36878, 13 P0KE673, 1-<PEEK<673J»1 ) 

15 prinitwbi vw>aFi iia* iiuhiaiitrf«a i'i«i«iAiiaiiiiir iv 
•i air. 

29 PPIM- Wflll-iVMUMb ' PP INT" BBMWOUS ETES UNE BOULE DRNS UN LHBVRIN 



PRINT-B EVITEZ LES OK 



THE" 

25 PRINT-W DIRIGEZ-VDUS RVEC " PRINTTflBCfir 

THCLES" 

38 PRINT "nOBH flPPUVEZ POUR JOUER " POKE190.8 UHIT190, l 0OSUB4B : QQTOW 

48 FORJ-8T07 FORI-240TO 1 30STEP-3 POKE36876 . 1 NEXT NEXT PQKE36876 . 8 RETURN 

58 POKE36B79.24 0"PEE«673)*3 P-P*l H-32 IFP«6THENP"l S-S*3888 

54 ONPOOSUB380. 358, 408.458,588 

33 S"S*<P-1>8(100*<V-VHL(TU))> PRINT' ■■TEMPS 8CORE ■"TfllOJ ; Y"«"Tra< 

14), S 

68 POKE36874.I3B P0KE8183.P*176 POXE38B84.0 POKE1J8-8 UBIT198. 1 PDKE36874.B T It- 

78 POXEn,arP0KER*38728,0 0-8 

188 LETC-PEEKC283) LETS-S*3 POKE36876.0 IFG<-1THENO»0 

184 IFC-26RNDH"77THEN0"-21 

183 IFC-33TMEN0-21 

188 IFC-34TMEN0-23 
187 IFC»44THENQ»-1 

tee iFc-i'iTHENo-i 

189 lFPOTHENIFflC793WNDR>7951THENH-233 5-5*288 P0KE36876, 138 0OTO1 12 
110 IFH>88THENU"fl POKEU*3072B.M-GOTO130 

112 IFH-62TMENFORI-8T06 FORJ-I38T0238STEP2 POKE36876.J NEXT NEXT POKE36876.100T 



382 PRINT" 

38S' PRINT" 

■ I ', 

384 PRINT" 
II 

383 PRINT"B 

■ » 

386 PR INT "W 



i w mrm in«*iinr j 



308 PRINT- 'W > ■T" OOSUB340 

318 W=7724T"7796 R-l V-23 RETURN 

349 FORI-8T023 POKE8163*! . 168 P0KE38883«I-6 NEXT RETURN 

338 PRINT-3M1 W 



384 PRINT" M 



v-nn w *r 



rTNl(3).V-VflL(TI«)"rTRBtl4; 



' P0KE8127.114 POKE38847.0 



058 

113 PRlNT'lHTEnPS 5C0RE 

128 ONPOOSUB28e.228,240,268,288 

125 IFH-42THENH-32 S-S*200 POKE36876 . 200 

130 lFV-VFL(TIf)<lTHENPRINT"N TEMPS ECOULE " 0OSUB48 NEXT P0KE198.8 MWITIM. l'RU 

140 POKER. M POKER* 38720. H LETA-A*0 LETH-PEEKCR) n-PEEK< 8*38728) I POKER. 81 -POKEBO 
•720. a 

149 GOTO I 08 

150 POKEU.H J-H U-U*22 H-PEEKOJ) IFH.I05ORH"95ORJ"183ORJ"93THEHJ^2B0 0OT0153 

151 P0KEU.2B9 IFH-320RUJ8196THENPQKEU, 81 POKEU*38728.0 O0T0131 

132 FORI«0TO40 NEXT QOTO130 

133 FOR1-0TO608 NEXT P0KE36877, 148 POKEU. 87 FORI-8TO380 NEXT POKEU.H P0KE36877.B 

134 FOR1-8T03 J-( I-0J-C 1-1 )*21»< l-2>*23«U-3) H-PEEK<ft*J> 
133 IFH"320RH«770RH-78THEN8"FI*J FORJ-0TO788 -NEXT 0OT078 
136 NEXT FORI-0TO608 NEXT G0T078 
280 POKET,32T"T*R P0KET.B1 POKET*30720. 
283 IFT-7886RNDR-1THENR—1 

286 IFT-7796RNDR—ITHENR-1 
210 RETURN 
228 P0KE781.9 P0KE782.9 POKE783.8 SVSS3520 : IFR"ITHENPRINT": 

222 IFR>10THENPR1NT"III 

225 POKE79! , 14 POKE?" 

8127,70 

230 IFR-15THENPP1NT" 

233 R"R*1 RETURN 

240 R-R.1 P0KE781.6 P0KE7B2.6 POKE783.0 SYS65320- IFR-4THENPRINT"k 

242 IFP-8THENPRINT' 

243 lFR-i;THENPRWT"k Mat J" R»8 

346 T"Ttl P0KE7BM2 P0KE792.7 P0KE7B1 <SVS6M2B IFT-I THFNPR!NT"B|y^ ■ 
3*7 lFT-iTHEIIPPINT"ffl^ W W W /" 
248 IFT-3THENPRIHT "XWW * W WW 1 ='3 
233 RETURN 

260 IFR-Fj012THENPOKEFl,H R-780? FOPI-eTOieB P0KE36974, 200 NEXT P0KE36874 
T*T*1 

262 R-R*l P0KE791-6 POKE 782 3 PQKE793.B SVS63320 IFP-1THENPRINT"»V»I 

263 IFR"7THENPPIHT"lli 

263 1FR-3THENPRINT"" 

266 1FR"13TNENPPINT 

270 IFP-18THENP0KE7926.78 P0KE7929. 70 POKE8008. 104 

273 IFR-4THENP0KE7926.113 P0KE7929. 1 1 3 PQKE8880 . 70 P0KE7871,98 

276 IFR=12THEN1FT^1THENPOKE7B71.70 

279 RETURN 

200 R"R»1 POKE 781 . 6 P0KE782, 8 ■ POKE 783. SVS65320 

282 IFR«1THENPRINT"0 W .'" PRINT"Tlf W MWm " P9.WT"W W 

283 IFR-1OTNENPR1NT"01 W IIW" PRINT'TU W IPJ V PRIST' 
W" 

203 T»T+rPOKE701,9^OKE7B2 
206 IFT-lTHENPRINT"fi 0* 

287 IFT-2THENPRINT"! 0" 
208 IFT"3THENPRINT"0 8 ■ • " T-0 

290 IFR-8037TNENPOKER.H H-7764 FORI-0TO100 POKE36074. 200 NEXT S-S+300 
292 IFV-2THENP0KE7936.32 



3M PRINT"* I 

I I Wi 

J57 PRINT- m 




Suite de la page 2 



4340 
4~5'j 
4360 

I3B0 
4398 
4480 

4410 
4420 

4440 
4430 



4-=?.:' 
4300 
4310 
43S0 

4 c ?t' 

- 3 a B 
4530 

4! 60 

4370 

4 1 : 10 



FORT=1TO100:NEKTT 
BOXFU0, 1>-(21.61" '.,3 

REM SE RETROUVE fl POIL — 

GOSUB 4530 

L0CATE12, i:PP!NT"A POIL." 
L0CflTE12,2!PPINI"V0US HVEZ - 
L0CflTE14,3:PRINT"L'ftIP- 
L0CftTE12,4:PPINT-VRRII1ENT" 
L0CflTE13,5:PRINT-C !!• 
PLAY ftIR2«:FLflG=l:RETURN 
FORT= I TO3B0SNEXTT: RETURN 

REH SE RHflBILLE 

PRINT-REHETTE2" 

L0CflTE13 f 4:PRINTV0TRE - 

L0CATE12.5 

ON POT-6 GOTO 4490,4580,4518 

PRINT-CHEMISE-SCOTO4520 

PRIKT-PH*ITflL0N":G0T0452e 

PRIKT-TEE -SHIRT" 

FORT=lTO30eiNEXTT: RETURN 

REfl 

LIWE'91, 15>-<9i,36>,0 

LINE-<84,40),0 

LINE-(91,4B',0 

LINE-(91,35:'.0 

LINE-(130,55>,0 

RETURN 

REM *■•••»••«•••»•«•••*••••■••• 

REN •<• PRESENTATION 

LOCATEB.e,0:CL'5 



4o40 SCPEEN.0,0 

4650 BO>:(0,0>-< , 31?,199>,4 

4660 BOK'lB,10>-<309y 189>.4 

4670 hTTRB0. HCOLORl 

4«60 LOCATE13.8.0 

4-90 PPINT'PATRICK LAHBIB' 

4-60 LOCATE 16, 18 

4710 PRINT-PRE5ENTE" 

4726 ATTRB1. liC0L0R4 

4"3e L0CATE12, 14:PR1NT"STBIP 21" 

4->40 H*«"L24D0L12HirHL24S0L12F«HlL24FftLA 

■ ■ 

4750 Ei- "L24COL1cNIFHl24S0L12FmMIl24PED0 

RERE" 

.... |: ... .:■..-:■. :,,■■'; ■■ 

PESODO" 

4"~-;< PLAVA*+B*+fl*+CJ 

4~80 L0CATE2, 21! ftTTRB8/e!COL0R7! PRINT 1 T^ 

PEP POUR AVOIR LES INSTRUCTION?" 

4790 L0CBTE£,2£:PRINT"TAPE:R I PGUP JOUER 

TOUT DE SUITE" 
4800 h*="" 

4: |0 h*=INKEY4 

■ ■ 
4?30 IF AI="1" THEN RETURN 
4548 IF R*< -"«« THEN 4860 
JS50 COLOP0.~!CLS:SCPEEN..4 
J960 LOCATE 9.2. «: h7 IfrEi . I 
4870 PPINT-E-ESHABILlEZ" 
4?30 LOCATE 9.4:PPINT"GEPTRUCE "» 
4890 hTTPB0.0:PRINT 

4?08 PRINT" LE BUT t-U JEU E^T &-OBTENI 
■ OU" 



MESURE A DROITE I>E L'ECRmN. 
DEPASSEZ 21.V0TRE COUP N'A 



E VOUS LE" 

4?50 PRINT" DESIRE: EN APPUVANT SUR I 

FOUCHE "i :COLOR7,A:PRINT"C":COLOP0.7 

4960 PRINT" VOTPE TOTAL S'flFFICHE flL 

R ET A" 

4-70 PRINT" 

SI VOUS" 
4980 PRINT" 
AUCUME" 
4990 PRINT" 
5000 PRINT" 
ARTES" 

5810 PRINT* QUE VOUS. POUR ARRETEP, TAP 
EZ SUR ";:COLOR7,0:PRINT"A";COLOR0,7 
5020 PRINT" ET SON TOTAL ftPPARAITRA A C 
OTE DU" 

5830 PRINT" VOTRE" 

5848 LOCATE 10. 24: COLOR I. 6! PR I NT" APPUYEZ 
SUR UNE TOUCHE"! 
5858 A$=INPUTI' 1 
5068 COLOR0,7:CLS:SCREEN,,4 
5078 L0CATE8.8 

5888 PRINT" SI VOUS GAGNEZ- VOUS VERSE 
2 LA" 



5090 PRINT 
IR DEVANT" 
5188 PRINT 
5110 PRINT" SIMON 



SENSUELLE GERTRUDE SE DEVET 
YEUX 



4910 PRINT 
DSSISLE)' 
4920 PRINT 
l\ vhLEURS 
4>30 PRINT 



DE S'EN hPPROCHER LE PLUS P 
EN TIPrtNT DE8 CARTES DONT L 
SONT COHPRISES ENTRE 1 ET I 
PRINT- PRENEZ. AUTANT DE CARTES OU 



VOUS VOUS RETROUVER 
EZ..." 
5128 LOCATEU. 14JATTRB1. i:PRINT*A POIL I 

5130 LOCATE 18, 24 :ATTRB8,8: COLOR 1.6! PR INT 

"APPUVEZ SUR UNE TOUCHE"! 

5148 H*=INPUT*r.i 

5158 RETURN 

5168 DATA04L2D0,L2D0l,L2RE.L2REf -L2MI.L2 

FA.L2FAi,L2S0.L2S04.L2LA.L2LA8,L2SI 

5170 DATA 05L2D0,05L2D08,05L2RE,05L2PEt, 

05L2MI.05L2FA.05L2FAt,Q5L2SO,05L2SOt,05L 

2LA.05L2LA4 • 



Tiens. si on se laisait une nou- 
velle rubnque de peliies annon- 
ces 9 Vous aviez deja la possi- 
bihle de vendre ou d'acheler des 
ordmateufs ou des programmes 
grace a IHHHHebdo. vous allez 
pouvoir mainlenanl chercher et 
peut-elre trouver autre chose 
un fer a souder presque neuf, 
par exemple ou des cassettes 
video, des BD. des disques et 
meme. pourquoi pas, une nou- 
velle nana ou un nouveau mec ! 
Cest pas sympa ca ? Et pen- 
dant qu'on y est. vous pourrez 
aussi passer des messages per- 
sonnels On vous a mis quel- 
ques exemples dans le numero 
de cette semaine : pas de cen- 
sure, et c'est gratuit ! A vous de 
jouer ! 

Le Sicob laisse entrevoir un 
phenomene un peu inquietant ; 
on a tendance a nous prendre 
pour des demeures ! Par exem- 
ple, Commodore veut vendre 
ses salopenes de fin de stock 
aux Frangais et garde' ses nou- 
veaux modeles pour d'autres 
pays. Autre exemple : Atari dai- 
gne tout juste nous montrer ses 
nouveaux modeles alors que les 
premiers 520 ST seront livres en 
Allemagne d'ici la fin du mois. II 
est vrai que les anglais, les aiie- 
mands, les espagnols et les ita- 
liens ont ete plus cooperatlfs 
avec les constructeurs : ils ont 
deja achete (les yeux termes ?), 
alors que les frangais attendent 
toujours pour se decider, Et 
comme les Africains, les In- 
dians, les Russes et les Kan- 
gourous ne sonl pas encore in- 
teresses. c'est nous qui sommes 
consideres comme le pays 
sous-developpe de I'Europe ' 
Encore une attitude qui va faire 
le bonheur des importateurs pa- 
ralleles ! Heureusement que 
nous avons nos ordinateurs lo- 
caux Thomson el que nous pou- 
vons nous demerder lout seuls I 



Gerard CECCALDI 
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MON CEIL ! 



J'en ai une bien bonne : la so- 
ciete Start Informatique vient 
de commercialiser un micro-or- 
dinateur traitement de textes 
pour les oui-aveugles baptise 
t'EPS Start. La ou ga devient 
gag, cest que cet engin est 
vendu avec un ecran !!(qui 
n'est pas en braille). L'appareil 
contient un synthetiseur vocal 
qui peut lire un texte mot par 
mot ou lettre par lettre. II 
donne aussi des indications 
sur les marges, les caracleres 
el les reperes dans le texte. 




UNE PWEAuTe^ 




Cha ch est bien, cha, Mais cha 
vaut cher : choichante mille 
balles environ {de (ambes). 
Rien n est trop beau pour les 
handicapes. On peut egale- 
ment lutiliser quand on est 
oui-voyant. 



(^jTmo^M 



CARAC 


TERES GRAPHIGUES 


• - 


GRPH'U 




GRPH'l 


B - 


GRPH'O 


t 


GRPH'P 


J 


GRPH'SHIFT'J 



Oil les ressources exceptionnelles de zezelte. seront 
utiles a I'accomplissement de sa penetrante desttnee. 

Christiane MECARY 

Mode d emploi ; 

Validez voire choix clavier ou joystick par ESPACE 

Zezette la vaiilante. doit retarder sa noyade par quelques ejaculas 

judicieux La lubnque recompense finale, sera proportionneiie au 

score obtenu. 



1320 SPRITE*(2)-CHR*!126I 'CHR* (124 
>'CHB*I222I 'CHR* 1255) 'CHR* I 245) 'CM 
P.* (223) *C MRU 1 1 1 I *CHR*(62> 
1330 SPR1TE*13)-CHR*!0)'CHR*I0) 'CH 

P»l 128' 'CHBH64I • CHR* 164 I •CMR1I64I 

• CHR* 164 I •CHRCM2B) 

1310 SPRITE*I4)-CHR*(0)'CHR*<3I*CH 
R* 15) 'CHR* (61 'CHR* (31 'CHR* (3) 'CHR* 
10>*CHR*(0J 

1330 SPRITE*13)-CHR*10I'CHR*(12B) * 
CHR* (64) 'CHR* 1224 I *CHR*IZ40I 'CHR* I 
240I«CHR*124S)*CHR*(124> 
1360 5PRITE*(6I-CHR*10I •Chmioi >CH 
R»(l .' .CHR«I?I «CHR»12> •CHRtlSI'CHRi 
121 •CHR*!!) 
1370 SPRITE* (71 -CHR* 11261 *CHR*I621 

• CHR* I 1 23 1 'CHR* I 233 1 »CHR* (1731 'CHR 
•<2S1>'CHR*12461 'CHR* 11 24 1 

1390 SPRI TE* 19) -CHR* ( 161 'CHR* (24) * 
CHR* 124) 'CHR* 160) 'CHR* (501 *CHR*!50 
I •CHR*(36)'CHR*(24) 

1400 SPRITE*! 10) "CHR* 10) -CHR* 14 I »C 
HR*1Z0) »CMR*IS6I 'CHR* (32) *CHRS1B) • 

CHRH61I-CHPH0I 

1410 SPRITES! 11I-CHR*:0) 'CHR* 132) • 

CHR* 1401 'CHR*IZS>*CHR*I4I •CMlrti 1 A i 

•CHRmi2l *CHR*IO> 

1420 SPRITE* I 20) -CHR* 156 I 'CHR* I 127 

) •CHR*(255)'CHR*I223) 'CHR* ( 2331 'CM 

R*(Z39) •CHR*I123>'CHR*151> 

1430 SPRITE* 121 ) -CHR* (281 'CHR* 1234 

) •CHR*(Z35)»CHR*(Z39I+CHR*(233I»CH 

R*(233)*CHR*(222) 'CHR* I 204 J 

1440 SPRITE* (22) -CHR* (31 *CHR*(3) <C 

HR*I3) -CHR*I 3> -CHR* ( 7 1 -CHR* 101 -CHR 

*(3>'CHR*(1I 

1430 SPRITE* 1 231 -CHR* I 1 92) •CMR1U9 

21 'CHR»1 192) -CHRtl 1921 'CHR»IZZ41 *C 

HR*10)*CHR*(19ZI 'CHR* (128 J 

1460 SPRlTE*(Z4)-CHH*(0l»CMR*lO>'C 

HR*(0)'CHR*(3) 'CHR*(11 I *CHR*13I)'C 

HR*(127) tCHR*l247) 

1470 SPRITE* I 23 1 -CHR*(OI 'CHR*IO) »C 

MR* (1921 *CHR*(2241 'CHR* ( 240) 'CHR* 1 

116) •CHRVI232) -CHR* 1234 I 

1990 X-130: T-01PRO- t?0:ZB-INT (RNDl 

D#4i :okl-19o:po-io 

199B REM DEPLACEMENT > 

19V? REM 

200O PUT5PRITE4, IO.O) , O , 4 : PUT SPRI ' 

E3, 1O.0) , 0,3:PUTSPRITE6. io,Oi,0,4 

PUTSPRITE7, (0,01 ,0,7 

2004 G-0 

2005 A-STICK1NJ :B-STRIG!N) 

2006 L1NEI20B, 471 - [208,321 , 14 



10 SCREEN2:C0L0R2, 1, 1 :CLS 

20 LINEIO, IB) - 1256, 102) ,4,BF 

22 LINE 10, 171 - 1236, 171 ,B: LINE 10, 10 

3) - 1256, 103) ,8 

30 DRAW8W80.20C1R20F30E30R20G40F4 

OL20H30G30L20E40M40* 

40 PAINT(B3,2Zi , 1 

30 open-grp:- for outputas mi 

33 line 10, 123) - (236, 123) , 6 : l ine 10, 

1236, 



QUEL: 
QUEL! 
CHM 



60 PRESET130, 1331 JPRlNTKl, "1 

R AVEC LE CLAVIER* 

70 PRESETI30, 160) IPRINTHl , "1 

R AVEC UN JOYSTICK* 

BO SPRITE*(0)-CHR*10> 'CHR*10I 

131) 'CHR* (63) -CHR* 11271 'CHR*! 

CHR* I 233 1 *CHR*IZ44) 

90 SPRITE*UI-CHR*(0)'CHR*!OI *CHR* 

1 233) 'CHR* I 255) 'CHR* (2551 *CHR*(233 

>'CHft*(2SS>'CHR«lO> 

100 SPRITE*12)-CHR*<0I*CHR*( 1281 -C 
HR* 1 160 1 'CHR* II 76) 'CHR* I 160) 'CHR* ( 

176) 'CHR* < 160) *CHR*U2B> 

HO SPRITE* 131 -CHR* t 190) -CHR*! 2341 

M HR* . ■■-'■ t CHR* (235) 'CHR* (118 1 'CHR 
*( 60) 'CHR* 10) 'CHHSIO) 



2 DO 



I32:x*-' 



220 IFX*-CHR*131 > ANDY< 130THEN 

6 

230 IFX*-CHR*130)ANDY>132THEN' 

K*-- "THEN300 

Y) ,13,0 



.9,2 



13,3 



270 PUT SPR1TE2, 136, 
280 PUT SPRITE3, 120, 

290 GOT02I0 

300 IFY-132THENN-0ELSEN-1 

>0 SCREEN?, 2, iVCOLORB, I , 1 :CLS 
DRAg*B*1lO, 160C14U70RZOU40RZOU 



20U2OL 1 50DZOLZOD40L20D60" 
020 LINE 1 10, 1301 -< 40, 199) , 
030 LINE 1230, 1301 - (256, 19< 
040 LINE I 230. 1501 - 1236, 19' 
030 LINEI90, 1301- 1180, 131 



2011 



15 2' 



151 ■ 



hf 



070 L1NE(90, 1531 - I ISO, 137 
OBO LINE 190, 1SB) -( 180, 163) ,B, 
090 LINE (90, 1641 -1180, 170) 

00 LINEI90, 1711 -( 180, 1731 ,8, 

10 LINE 190, 1741 - (ISO, 199 

11 LINE 140, 1901 -IB9, 1991 , S.BFILI 

1 ISO, 1901 -1229, 1991 ,3,8F 

20 A*--C12R4D11L4R4U2R7FID2R3U3H 

9R41MC2U2L1R4L1D2* 

30 DRAW8M59, 43XA*| * 

40 DRAWBM39, 73XA9I ' 

SO A*-*C12L4DUR4L4U3i *S1D2L3U5£ 

9L4U1C2U2R1L4R1D2* 

■SO DRAU-BM20B.43XA*! - 

7o DRAy*BM228,73XA*l ■ 

80 preset (30, 13) 1printbi, *viek: * 
90 vie-2:b-io3:t-o:m-3o:sc-o 

93 linei 10,31 -(236,5) ,4:line 

01 - 1236,301 ,4 

200 FORA-1T0VIE 

210 DRAW-BN-Bi .7C10D14H3L2G4DSF. 

E3R3F3R4E3USH4LZG3U14H1L3G1D3L 



214 


PSET!B'7,27i , 131PSET IB- 


213 


LINE (B '28, 71- IB' 60, 29 1 , 


2 20 


B-B*2B 


230 


NEXT 


300 


SPRITE*(OI-CHR*IO)*CHR* 


■ 1 2 


• CHR*(7I 'CHR* I 151 'CMP*! 


■ 1 3 


)'CHR*(621 


S 1 


SPRI TE*( 1 1 -CHR1IOI 'CHR* 



• 196) *CHR*( 16' 



2015 IFX>173THEN9300 

Z02O IFA-60RA-70RA-8THEN2300 

2030 PUTSPRITEO, IK, 133) , 13,0 

Z040 PUTSPRITE1, IX'B, 1331 , 13, 1 

2050 PUTSPRITE2, (X, 141 I ,13,2 

2060 PUTSPRITE3, IX'8, 141) ,6,3 

2070 IFZB-1THENG0SU84000 

2080 IFZB-2THENGOSUB3000 

2090 1FZB-3THENG0SUB60O0 

2100 IFZB-OTHENGOSU87O0O 

2110 IFB-- 1 THEN3000 

2120 G0T0200S 

2497 REM 

Z498 REM DEPLACEMENT < 

2499 REM 

2300 PUTSPRITEO, 10,0) , O, O: PUTSPR1 T 

El, 10,01 ,6, 1 1 PUT SPRI TE2, 10,01,0,2: 

PUTSPRITE3, (0,01,0,3 

2504 G-l 

2505 A-sTicxiNi :b-strig(ni 

2306 L1NEI208,47) -1208,52) , 14 
2310 IFA-20RA-30RA-4THEN2000 
2513 IFX<79THEN95O0 
23Z0 IFA-60RA-70RA-BTMENX-X-3 
2330 PUTSPRITE4, IX, 133) , 13,4 
2340 PUTSPRITE3, (X'B, 133) , 13,5 
2330 PUTSPRITE6, IX, 1411 ,6,6 
2560 PUTSPR1TE7, IX'B, 1411 . 13,7 
2370 1FZB-1TMENGOSUB4000 
Z380 IFZB-2THENG0SUB3O00 
Z390 IFZB-3TMENQOSUB6000 
2600 IF2B-0THENG0SUB7000 
Z610 IFB--1THEN33O0 
Z620 G0T02505 

2996 REM TIR GAUCHE 

2999 REM 

3000 0-12B: I»X'9 
3005 F0RS-IT0257STEP2 

3007 IFPOINT IS'4,0-1)-7THEN9000 
3010 PUT SPRITES, (S,0) , 15,10 
302O 0-0-2 
3030 NEXT 
3040 GOT02000 




3497 REM 

3498 REM TIR DROIT 

3499 REM 

3300 D-128'I-X 

3309 F0RS-IT00STEP-2 

3310 PUT SPRITES, (5,0) , 13, 11 
3315 IFPOINT IS'Z, 0-1 I "7TMEN9000 
3520 0-0-2 

3530 NEXT 

3540 G0TO2300 

399? REM ROBINET 1 

4000 L1NE133.751 - 136,80) , 7.8F 

4010 v>5o:h-sq:ro-'1 
4020 t-t'1-ift-mthenbooo 

4030 RETURN 

4999 REM ROBINET 2 

5000 LINE133, 471 -(36,521 , 7, BF 
3O10 V"70:H-43: R0"2 

3020 T-T'l: IFT-MTHENBOOO 

3O30 RETURN 

3999 REM ROBINET 3 

6000 LINE1213, 471 -1216,321 ,7, BF 

6010 V-19l:H-43:R0-3 

6020 T-T'l; IFT-MTHEN8000 

6030 RETURN 

6300 PLAY-ABC*:X*-INPUT*I3) 

6999 REM ROBINET 4 

7000 L1NEI232, 741-1233, 79) ,7, BF 
7010 V-211 :h-80:R0-4 

7OZ0 T-TH: IFT-MTHEN8000 

^030 RETURN 

7997 REM 

799B REM EAU 

7999 REM 

8000 IFOKDPROTHENPRO-OKL 
8003 FORS-HTOPROSTEPZ 
8010 PUTSPRITE9, IV,S) ,3,9 
8020 NEXT 

8030 1FZB-1ORZB-2THEN820O 

8040 IFZB-3ORZB-0THENB400 

B060 ZB-1NTIRNDI 1)#4) :T-o:n-w*i 

B061 IFRO-ITHENLINE (33, 73) - 136, BO) 



B06Z I FRO-ZTMENL INE (33,471- 136,321 
, l.BF 

8063 IFR0-3TMENLINE (213,47) -1216,3 
2 1 , 1 , BF 

8064 IFR0-4THENLINE<23Z,741-I233,7 
9) , l.BF 

8070 IFG-ITHEN2S00ELSE2OOO 

BZOO OKL-0KL-2 

8Z10 LINE 140, OKL! - I89,0KL'1 ) ,3,BF 

8213 PLAY-D* 

8216 IF0KLOS0THEN9800 

8220 G0TO8060 

8400 PRO-PRO-2 

84 lO LINEI18O,PH0)>I229,PR0'l),3,B 

8413 PLAY-D* 

B416 IFPR0(13OTHENV800 

B420 G0T0B06O 

9000 SC-SC'3 

9010 PL0Y-03D- 

?020 IFR0-1TMENLINE(33,73 



, 1 ,BF 

9030 IFR0-ZTHENLINE133.47 

■ l.BF 

904O IFRO-3THENLINE(Z13,4 

2) , l.BF 

9050 1FR0-4TMENL1NE(232,7 

9) ,1,BF 

9055 PUTSPHITEB, 10,0) , 

TEB, 10,0) , 11 

9057 28-INT (RNDI1)#4) 1 

?060 IFG-1THEN230OELSE2OO0 

9300 REM «\B( VIES IB\8 

9510 VIE-VIE-1 

9313 PRO-PRO*e:0KL-OKL'6:M-t 

9320 IFVie-0TH6NLINE(90.6 

) , 1 , BF 

9530 IFU1E-I THENlINE I 120, 

01 , l.BF 

9331 f0rea-0t07iput sprit 
,0,Ea:next 

9332 f0ri0-133t01b0stepz. 

9333 put sprite20, ix, 101 , 

SPRITE 2 I , (X'B,I01,13,2i:i 
E22, IX, 10'B) ,13,22:RUT SPR 
•8, 10'B) ,13,23 

9334 NEXT 

9533 put spr1te20, (0,0 
prite21, 10, 01,0, 21: put sprite 22, (0 
,0),0,z2:put sprite23, (0,0) ,0,23 
9536 put sprite24, ix, 101, 
spritezs, (x'b, 10' . 13,23 
9540 play*v1004l10abcdefgrgfedcbc 
9352 fortem=otoiboo:nexttem;beep 
9355 put sprite24, 10,0) , 

PRITE25. (0,0) ,0,Z5 

9556 IFVI£--1THENV-172:C- 

9560 J<=130:G0TO2O00 



-136,60 
- (56,52 



20: PUT 5 



9800 LINE(40, 150>-<S9, iv«. , I , 3" 

9810 LINE HBO, 150) -1229,1901 ,5,BF 

9820 LINE(52,B6) -(33, 160>,5,BF 

9830 LINE(72,351 -173, 160) ,5,BF 

9840 LINEI 19Z, 55) -1193, 1601 ,3, BF 

9850 LINEIZ1Z,B5I -(215, 1601 ,5,BF 

9B53 F0RA-1T0300:NEXTA 

9860 FORA-130T040STEP-5 

9870 LINEIIO.A) -I236.A-3) ,5,BF 

9875 PLAV"03L64A-:F0RB-1T065;NEXTB 

98B0 NEXTA 

9883 F0RA>1T0400:NEXTA 

9890 PLAVV10L6404ABCDEFGBCDEFGCDE 

FGDEF' 

9893 fora-itoiooo:nexta 

9900 fora*0to7:put spr1tea, (0,01 ,0 

,a:next 

9910 spri te*1z31"chr*(24i «chr*i24) 

• chr* i 24 1 'chr* (233) *chr* ( 24 ) «chr*1 

24 I* CHR* (24) +CHR*(24) 

9920 SPRITE*I26)-CHR*(Z4) 'CHR* 124) 

• CHR* 124 I 'CHR* (24 I 'CHR* < 60) 'CHR* 1 1 ' 
26) •CHR*I253)'CMR*IZ35) 

9930 PUT SPRITE23, IX*4,Y'31 , 15,25: 

PUT SPRITE26, (X.4,Y»11) , 13,26 

9940 PLAY-V10L64D4ABCDEFGBCDEFGCOE 

FGDEF* 

9930 PLAY-V10L6403A8CDEFGBCDEFGCDE 

FODEF- 

9960 FOR a-itoiooo:nexta 

9970 LINE (83,801 - (183,901 , 1 , BF : PRE 
SET(100,ei ) :PRINTH1, -Can* Ovtrr" 
99B0 F0RA-1TO2000:n6XT 
10000 REM •.i.inmi..mttiH.M 

10010 REM t INTERD1T - 18 AN5 

10020 REM .»Mt«*Hl.l.lIHlHH(4 

10023 NI-172 

10030 SCREEN2,2,2:C0L0R9, 1, l:CLS 
10040 LINE (68,64) -(32, 1321 ,3: LINE- 
STEP I 176,0) ,3: LINE-STEP I -36, -B8) ,3 
10030 LINE -STEP I -15,0) ,5: LINE (68, 6 
4)-(80,64l ,3 

10060 LINE I 32, 15ZI-IZ0B, 1721 ,4, BF: 
LINE (40, 173) -(43,180) , 10, BF : LINEI 1 
96, 173) - (201 , 180) , 10, BF 
10070 DRAW-BM68.64C3U32E8R8BFBD32L 
3U30M4L90G4D.10L3* "PAINT 170,621 ,3 
lOOBO SPRITE* (I )-CHR»12l»CMR*173)' 
CHR*(33)'CHR*(42)'CHR*(4) >CHR*< 19) 
•CHR*1 13BI 'CHR*<4> 

10090 SPRITE* (21 -CHR* 164) ♦CHR* ( B) • 
CHR*( 10O1 'CHR*< 136) 'CHR* 132) ♦CHR* I 
BO) *CHR*( 132)'CHR*(160) 
10100 SPRITE*l3)-CHR*(2) 'CHR* I 1 1 -C 
HR»12I .CHR*(2)'CHR*I2) -CHR* (27) -CH 
R*(3B) >CHR*I66) 

10110 SPRITE* 14) -CHR* (01 •CHR* 10) »C 
HR*l 1Z81 •CHR* I 1 28 I 'CHR*! 128) 'CHR* I 
132) •CHR*<228) •CHR*(66) 

101 11 SPRITE*(31"CHR*!0) •CHR*101 -C 
hk* i 1ZI -CHR* I IB I 'CHR* I 13) 'CHR* (29) 

• CHRC126) 'CHRX41 

10114 SPRITE* 191 -CHR* 10) .CHRUCi] -C 
HR*11ZI 'CHR*! IB) »CHR*144) .CHB*(461 
+CHR*(22I 'CHR*(8I 

10113 SPR1TE*(9)-CHR*10)'CHR*I44)« 
CHR* 1126) •CHR*10)'CHR*(I26) *CHR*i6 
01 *CMR*(60) 'CHRSI60I 

10116 SPRITE*! 10) -CHR* 160) 'CHR* (60 
I 'CHR* 160 I 'CHR* I 60 I 'CHR* 160) 'CHR* ( 
60) 'CHRS160) *CHR«!60) 

10117 SPRITE*(11)-CHR*13) *CHR»17> * 
CHR*113) 'CHR* (14) 'CHR*113>'CHR*(15 
I 'CHR*16> 'CHR*(3I 

10118 SPR1TE*<12)-CHR*160I 'CHR* I 25 
5) • CHR* I 2331 'CHR* I 235) 'CHR* 1223) 'C 
HR*( 2331 'CHR* (231) 'CHR* I 193) 

10119 SPRITE*!13)-CHR«(192)*CHR*(2 
24) 'CHR* (240) 'CHR* (176) 'CHR* 1240) • 
CHR* (240 I •CHR*196)'CHR*(192) 

10120 REM JJJ JAMBE DROITE 3JJ 

10 130 L I NE I 1 I 6 , 96 ) - I 1 04 , 84 ) : L I NE - S 
TEP1-16, -12) : LINE -STEP I -4,0) 
10140 LINE-STEP(-4,2) :LINE-STEP(-1 
8,36):LINE-STEP(-4,4):l1NE-STEP(-2 

• 4) 

10150 LINE-STEP(-6,ai:LINE-STEP(-2 
,61 :LINE -STEP 14,21 :LINE-STEP(4,-4i 
10160 LINE -STEP 1 2, -4) : L INE -STEP I 8, 
-4) :LINE-STEP(0, -41 : LINE-STEP 118, - 



10173 IF5CO0THEN10601 
10180 REM JJJ JAMBE GAUCHE JJJ 
10190 LINEI 120,96)- 1139,721 :L1NE-S 
TEP14.2I : LINE -STEP 1 4, 6) : LINE-STEP I 



10,321 

10200 LINE-STEPI3.8) : LINE-STEP (8, 

6) I LINE -STEP (-4, 6) : LINE -STEP I -6, - 



10210 


L INE 


STEP<-6 


■6) :l 


INE 


-STEPIO 


, -6) ;line-ST6P(-b, 


1Z> IL 


INE 


-STEPI- 


4,-BI 












10220 


L. I HE 


STEPIO, 


5) :l: 


»fc- 


»TEP(-1 


2, 18) 


L INK 


6TEPI-12, 11) : 


.INE-STEPI 


-6,0) 


LINE 


-STEP I -6 


-bi 






10ZZ9 


1FSC 


I 00 THEN 


060 1 






10230 


*m 


J J CORPS JJJ 






10240 


L1NE 


108,68) 


I 106 


90 


:linc-b 


TEPI3 


0' : l 


HE-STEP 


2, -3 


:L 


4E-STEP 


(2,-6 












10230 


LIME 


-STE-M-10,?), 


:L 


HE-STEP 


!-2. - 

Hi -9 

102*0 


i :linc-btep< 


2.-3 


1LINE-STEP 


LINt 


-STEPI-18,21 :l 


INI 


■STEP! - 



IS, -1*1 

ILINE-STEPI 

ILINE-STEPI 
4, 1) ILINE-STEPIl, -41 

10260 LINE-ETEPII3.0) , l:LINE-STEP! 
1,4) : LINE-STEP 18, 1) : L INE -STEP I IB, - 
I) 

10290 L INE-STEP 111, -13) : LINE-STEP! 
3,1), 1 ILINE -STEP 1-7, 16) 1LINE -STEP! 
-4,4) 
1O3O0 LINE-STEP < -22,4) : L INE-STEP (1 



10310 LINE-STEPI- 
3,-3) :LINE!132,81 
10313 PUT SPRITES, 1 



31 : L1NE-STEPI - 
131,88) 

•II ,?,3:PUT 



SPRITES, I 127, 71), 9, 8 
10319 IFSC< 120 THEN 10601 
103Z0 REM JJJ TETE JJJ 
10330 PRESET (113,31) : LINE-STEP I -2, 
-3) : LINE-STEP 10, -4) : LINE-STEP I*, -4 

10340 LINE-STEP 14, -2) : LINE-STEP (4, 
01 : LINE-STEP 14, 2) : LINE-STEP 12, 101 
10350 LINE-STEPIO, 11) 
10360 PRESET II 16,40) : LINE -5TEP 10, - 
Z) :L1NE-STEP(3,-1) 



10370 


f'SE T 


(123,39 


1PSET 


124 


40) 




103B0 


"i,ll 


;12B,46 


:drau 


D5- 






10399 


IESC 


< 170THE* 


10601 








10400 


PU1 


5PHITE1, 


mo. 


DQ1 


14 ; 


:p 


UT SPRITE2 






2:P 




ri 


TE3, I 


10,1 


3B) ,9,3! 


»UT S 


RITE4, 1 


IB 
















10405 


PSCl 


1114,43) 


:PSET 


1 15 


43) 




10410 






I ONE THE S 






10420 




1-30T0180STEP 








10430 


DRAW 


■BMZ24,- 


A1C12R8U10" 




10450 


PRESET120.7 


:prin 


HI , 


SCORE 


: -tsc 














10460 


PRESET1200, 


0) :PR 


NIK 


, "TENS 


ION* 














10469 


1FSC 


<220THEN10601 








10300 


CL1R 


"11016 










103 10 


FORI 


-11ZT0U 


46TEP 


1 






10520 


WJ1 


;mrite? 


(114, 


11 ,6 


V. PL 




SPRITE 10, 1 


114, B'8 


,?, 10 


PUT 


■PR 


TE 


12, ( 


14,1 


•16) ,9, 


2 








10530 


PUI 


■PRITE1 


,1106 


i< 1 


,) ,9 


1 1 


:PUT SPRITEI3, 1123 


,B'16 


.?, 


13 





' NE* 



1054Z PLAY-0ZL64D01EFOZD* 

103S0 FOR C-104T0112 

10360 PUT SPRITE?, (114, CI ,6, 9:PUT 

SPRITEIO, (114,C'8>,9, 10: PUT SPRITE 

12, 1114,C'16),9, 12 
10370 PUT SPRITEH, (I06,C*16) ,9, 11 
;PUT SPRITE13, 11ZZ,C*161 ,9, 13 
10360 NEXTC 
10362 PLAY-02D* 

10590 GOSUBUOOO 

10591 NEXTA 

10395 PLAY-03L20ABCBCD-1FORA-1T030 
OINBXT* 

10600 CL0SE41 1GOT010 

10601 FOR A-30T0160STEP10 

10602 DRAW*BM224,-AIC12R6U10- 

10603 NEXT 

10604 PRESET 120, 71 : PRINT *)1 , "SCORE 
: *ISC 

10603 PRESET (2O0, 10) i PRINT4 1 , * TENS 

ION" 

10606 FOR A-1T016:GOSUB11000:PLAY* 

03L30A* : FORB- 1 TO 100 ! NEXTBJ NEXTA 

10606 PLAY '03L20ABC BCD *:FORA-1T050 

01 NEXTA 

10610 CLOSER! 

10620 G0T010 

11000 LINE (225, Nil- 1 229, N I '61 ,6,BF 

11010 NI-NI -10 

11020 RETURN 
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CANON X07 



Jones est de retour et une fois encore, la recherche 
d'une "idole" sera pretexte a de multiples aventures, 
pour notre plus grand bonheur. 



Mode demploi : 

Ce programme occupe 9442 octets 

Vous evoluez dans une caveme truffee de serpents, trous. tosses. 

arakjnees et pieges inattendus Votre but est de recuperer une idole 

srtuee au fond du niveau mfeneur et bien sur. de ressortir indemne 



Les actions de votre personnage sont les suivantes 
f pour sauter 
-4 pour alter vers ia droite 
— pour alter vers la gauche 
.___ Quelques remarques concernant les ditferents pieges 
Stephane BAUDET DALLES : la derniere position des araignees du tableau precedent, 
vous renseignera sur le danger que represenle votre position sur 
une dalle blanche ou noire (a partir du 4eme tableau). 
DESCENTE : un trou repere par un detail du decor, vous permettra 
d'atteindre le niveau mfeneur (et de remonter). 

IDOLE ; IkJote en votre possession, les pieges se teront plus nom- 
breux et il vous taudra etre tres rapide pour atteindre la sortie 
Appuyez sur "E" pour rejouer Si la musique du genenque ne vous 
salisfait pas. essayez les modifications indiquees 




6720 FORI- 1 T03B: RE ADA, B: BEEPA, B : NE 
XTI 

6800 DAT A 10, 6, 11,3, 13,6, IB, 12,8,6, 

10, 3, 11, 34,13, A, 13, 3, 17,6,23, 12 
6810 DAT A 15, 6, 17,3, 18,8,20,8,22,3, 
0,5, 10,6, 11, 3, 13, 6, 18, 12,20,6,22,3 
6820 DATA23.24, 13,3, 13,3, 13,3, 13,3 
,22,9,20,6, 13,3,22,9,20,6,13,3 
6830 DATA23, 9, 22,6,20, 3, 18,3 



1 ■ m »«»»»t» n »i» 

2 * ftlNDIANA JONES* 

3 ■ «■»*»»■•■•««»»»« 

4 ' ## COPYRIGHT #* 

5 ' BAUDET STEPHANE 

6 * H t H I HI l li l lt 

7 ' 

8 ' INTRODUCTION b 

9 -GRAPHISMES 

10 CLS:GOSUS60OO 
15 CLEAR200 

99 'CREATION CARACTERES 

100 FONT* I 128) = -0,48, 1 20 , 4B, 1 24 , 1 7 
6,40, 72" 

HO FONT* 1129) ='0,48, 120,48,248,52 

,80,72" 

120 FONTS! 130) -'0,24,60,24,60, 112, 

160,64' 

130 FONTS! 131 I ="0, 48, 120,48,240,36 

,20,8" 

140 FONT*! 132) -"O.O. 0,0, 0,0, 80,40* 

130 FONT* (133) -"0,0,0,0, 0,0, 40, 80* 

160 FONTS! 134)--252, 232, 232, 232, 25 

2,56, 16, O 

170 FONT*! 135) *"232, 252, 232, 124,60 

,40,0,0- 

180 FONTS! 136) -*252, 248, 112,48,32, 

0,0,0* 

190 FONT** 137)-* 136,220, 232, 248,23 

2,232,252,248* 

200 FONTS! 138) -*60, 124,232,232,232 

, 124,232,232* 

210 F0NT*(139)-*140,220,252,232,23 

2,232,252,252* 

220 F0NT*<140> -* 252, 232, 232, 232, 23 

2, 252,252,252* 

230 FONTS! 141 l-*232, 232, 188,36,48, 

16, 16, 16" 

240 FONT*( 142)-* 16, 16, 16,32,32,32, 

64,64 s 

230 FONTS! 143)=" 16, 104,248, 104, 120 

, lOO, 124,4" 

260 FONT*! 144)-" 16, B4, 84, 56, 124,40 

,68,68" 

270 FONTS! 143) -"16, 16, 16, 16, 16, 16, 

16, 16" 

280 FONT* ( 1 46 ) - * 232 , , 232 , 232 , 232 , 

232,232,232* 

290 FONT*(148)>*16, 16, 16,8,8,8,4,4 

300 FONT*! ISO) -'16, 16, 16, 32, 32, 32, 

64 , 64 " 

310 FONTS! 149) ■- 16, 104,248, 104,120 

, lOO, 124,4* 

320 FONTS (147) -"0,0, 96, 240, 96, 120, 

100, 124" 

330 FONT* (224) -"232, 232, 10B, 16,16, 

42, 16,16* 

340 FONTS (223) -'128,128, 192, 224, 24 

, 248 , 232 , 232 * 

330 FONT*!226)-*0,4,4,0,4, 12,4,4* 

360 FONTS<227>-*0, 128, 128, 128, 128, 

192, 128, 128* 

370 F0NT*<228>>-4,4 I 12,28,60,124,2 

32,232- 

380 FONT*(229)--0,0, 12,16,32,64, 12 

8,128 

390 FONTS I 230)- -O.O.I 92, 32, 16, 8, 4, 

4" 

400 FONTSI231)-*128, 128,64,32.16, 1 

2,0,0" 

410 FONT*(232>*-4,4,8,16,32, 192,0, 

o- 

SOO 'CREATION DECOR 

510 FCWP-OTOI9:READPL:P*-P**CHR*IP 

L) :NEXTP 

330 TS-CHR*(137I ♦• -♦CHR*(138) 

360 FS-CHRSU37)*- *+CHR*(138> 

370 S*-CHRS(140)*CMRS(139)*CHRS<14 

O) *CHRS(140> 

380 DS-CHRS( 1401 *CHRSU46) *CHRS(14 



0) +CHRSU46) 

690 SOL*(0)-CHRS( 140) *CHRS(140) *T* 

♦SS+SS*TS*TS 

700 SOLS( 1 )-S**T**S**S**T**CHRS(13 

9) 

710 S0LS(2)=SS*TS»T**CHR*( 139) *F»* 

CHRS( 140) *CHR*(139) 

720 S0L*(3)-T*+S**S**TS*CHRS(140I * 

CHRS(139)*T* 

730 S0LS(4)-SS+TS*TS*CHRS(140)*CHR 

S<139) *D**T* 

740 S0L*(5)-SS*D* + CHR*U39l *D**S«* 

CHR*{139)+CHR*(140> 

900 DATA 134,133,133,136,134,136,1 

41, 141, 134, 133,224, 136, 141,141 

VIO DATA 141,141,134,134,133,136 

1000 '————- 

1001 * .AFFICH.TABL. 

1002 * — — — — - 

1003 ' 

ioio cls:t-i:hs»chrs(12B) :x-i:re-i 

ion ca-i:h-i:n-i 

1012 tihes--oo:oo:oo* 

noo cls:locateo,o:printpsi 

1130 DE-INT (RND!1)*4*1) :RU-INTIRND 

<DE>*4+1) 

1 200 I FT < 1 ANDET-OTHEN I F I D- 1 THEN700 

OELSEIOIO 

1210 LOCATEO,3:PRINTSOL*(T) | 

1220 1FDE-RUANDET-0ANDT< MTHENLOCA 

TE10,3:PRINT- -| 

1230 f0ri-1t06:line i 113+1 ,24) -!113 
+1,31) :nexti 

1300 »ii ■ ii ■ ■■■■■■■ 

1301 * -OEPLACEHENT- 

1302 * — — — — —— — — — HBH 

1303 * 

1 526 aO§Ui 1 966 • G6§UB 1916: L QC Ate X , 2 
: PR I NTH* i 

1330 TTS-INKEI* 

l'6Cfb IFTTS-CHRS(28)ANDX<20THENSC-S 

c*re:goto2100 

1630 iftts-chrs(29)andx>0thensc-sc 

-RE:G0T02200 

1660 IFTTS-CHRSI30)THEN23OO 

1 800 G0SUB3000 : G0SUB4000 : GOTO 1 320 

1900 IFX>-19ANDHS-CHRS(128)THENT-T 

♦ l: PRINT- "J :X-0:GOTOHOOELSERETUR 

N 

1910 IFX<-0ANDH*-CHR*(129)THENT-T- 

1 : X-18: GOTOl 100ELSERETURN 

2000 •————- 

2001 'RESULT. DEPL. 

2002 •—»——— 

2003 ' 

2100 l0catex,2:print- "cx-x + l:hs- 
chrs(128) :gosub3000:got01s20 
2200 locatex,2:print- -i:x-x-i:h*» 
chr*(129) :g05ub3000:g0t01500 
2300 ifhs-chr*(129)then2400 

23SO L0CATEX,2:PRINT" "lILOCATEX+l 

, 1 :PRINTCHR*!130) t : FORI- itoso: NEXT 

2333 SC-SC*1RE*3> 

2360 LOCATEX+1, ltPRINT* "t:x-X*2:l 

FXJ1BTHENX-0: T-T+l : GOTOl 100 : ELSEG0 

SUB3000 

2370 GOTOl 300 

2400 LOCATEX, 2: PRINT " ■ J : LOCATEX- I 

, i:PRINTCHRS(131) I : FORI- 1T050: NEXT 

2420 SC-SC- IRE*3> 

24SO LOCATEX-1, i:PRINT- "i:X-X-2:I 

FX<0THENX-19:T-T-l: GOTOl lOO: ELSE GO 

SUB3000 

2SOO GOTOl 300 

3000 ——————— 

3001 '— PIEGES — 

3002 ' -•••-— ------ 

3004 ' 

3100 IFID-1ANDTOOTHENGOSUB3700 

3130 ONT+1GOSUB3170. 3200.3300,3400 

,3500,3600 

3160 GOT 03900 

3163 IFID-1THENG0SUB3700 

3170 'DESCENTE 

3180 IFX<2THENX«2 

3190 RETURN 

3200 ' SERPENTS 

3210 IFX-(13«SE)ORX-!3-SE)THENSD-l 

: GOT 05000 

3220 IFID-lANDXv 16ANDX>- I IB-BO) THE 

N3OO0 

3290 RETURN 

3300 ' FOSSE 



3310 IFX>11ANDX< 1 6ANDX- I -M*l • 112* ( 

MM. I) ) )THEN4320 

3390 RETURN 

3400 'ARAIGNEES 

3410 IFX>6ANDAA-lTHENSD-l:G0TO3000 

3420 IFX-7ANDAA-OTHENSD-l:G0TO3O0O 

3490 RETURN 

3300 ' DALES 

3510 FORD-0T02STEP2: IFX-112* IAA+D) 

>THEN4120ELSENEXTD 

3320 IFX>18ANDET"0THENT-INT(RND! 1) 

•3*1) 

3390 RETURN 

3600 * IDOLE 

3610 IFX>13THENF0NT*<128)-*0,48, 12 

0,48,232,240,40,72* : H*-CHR* ( 129) :E 

LSE3640 

3620 FONT*( 129) -"0,48, 120,48,232,6 

O, 80, 72* : FONTS! 227) -*O t 0,0, 0,0, 192 

, 128,128' 

3630 FONTS! 226) --0,0,0,0,0, 12,4,4- 

:x>14:id-i:re--i: RETURN 

3640 IFID-lAND(X-6+AA0RX-12+AA)THE 

N4120 

3630 RETURN . 

3700 * RIEN A VOIR 

3710 ZZ-ZZ+.04: IFZZ>20THENZZ-20 

3713 LINE(21,24)-(21,24-ZZ) 

3720 ifx-3andzz>3thenx-x+i:l0cate3 
,2:print* *i 

3721 ifx-2andzz>12thenx-x+2 

3730 RETURN 

3900 * 

3910 IFX>0ANDX<19ANDX< MOTHENIFSCR 

EEN ( X , 3 ) -32THENG0T05000 

3915 IFX-10ANDSCREEN(10,3)-32THENB 

ooo 

3926 RE TURN 

4000 ' ■■■■ 

4001 ' —ACTION (P> -- 

4002 '————— 

4003 ' 

4010 0NT+1G0T04300, 4400,4300, 4200, 

41 00,4030 

4030 * 88 ID0LEB8 

4060 LOCATE 13, 2: PR I NT C HRS < 226 > 1 : LO 

CATE16,2:PRINTCHRS(227) 1 

4073 LOCATE 19, 1 : PRINTCHRS (228) I : LO 

CATE18,2:PRINTCHRS(228) i :L0CATE19, 

2:PRINTCHR*(140) I 

4090 RETURN 

4100 ' 88 DALES88 

4110 RETURN 

4120 LOCATEX, 2:PRINTH* 

4121 IFINKEYS< >*"THEN1330 

4122 FORI -2T020: PRESET (X*6+3, I ) : PS 
ET(X*6*3, 1*1 > :PSET !X*6*3, 1*2) : BEEP 
I, 1!NEXTI 

4130 SD-1!G0T05000 

4200 '88 ARAIGNES88 

4210 L0CATE6, 1:PRINTCHR*( 144+AA) i : 

L0CATE6,2:PRINTCHR*(145-AA) 1 

4220 L0CATE7, 1 : PRINTCHRS! 145-AA) J : 

LOCATE?, 2: PRINT CHR* < 144+AA) i 

4225 TE-TE+1 

4230 IFTE-3THENTE-0: : BEEPRND! 1 ) #10 

, 1! IFAA-0THENAA-1ELSEIFAA-1THENAA- 

O 

4290 RETURN 

4300 '88 FOSSE 88 

4310 G0SUB4370: RETURN 

4320 CA-0 

4321 BEEP(RND( 1>*10) , i:G0SUB4370 

4322 IFINKEY*-""THEN4321ELSE4325 

4323 IF! !-N+ (12+ 1H#LI ) ) >-12ANDX-15 
i OR I !-N*!12* IN8LI) ) ) -13ANDX-I2) THE 
N4330 

4326 G0T0439S 

4330 IFX< 13THCNX-16:CA--1ELS£X-11 : 

CA-1 

4340 LOCATE 12+ ( IN*LII -N) , 2IPRINTCH 

R*!149*CA) I :CA>-CA:G0T01320 

4370 l0cate12, i:print" "iilocat 

ei2,2:prinT" ■; 

4373 locate12*(phh.i> , 1 : printchr*( 1 

43 > i : LOCATE 12* (HtLI I , 2 : PRINTCHRS ( 1 

49+CA) 1 

4360 LI-LI *i:CA--CA: IF 1N4LI ) >20R(H 

•LIX1THENL1>-LI:N--M 

4390 RETURN . 

4393 L0CATE12,2:PRINT* * I : G0T03 

OOO 

4400 '88 SERPENT 88 



4403 L0CATE15+SE,2:PRINTCHR*I 1321 ♦ 

- *l :SE-SE-1 

4406 L0CATE4-SE,2:PRINT* *»CHRS!13 

3i t :fori-itos:nexti 

4410 ifse--iothense«o:locate6,2:pr 

INT- '( 

4420 IFID-1ANDET-0ANDX< 16THEN4430E 

LSE4490 

4425 IFX>16THEN4490 

4430 LCCATE18-B0, UPRINT* - I : LOCA 

TE18-B0,2:PRINT- *{ 

4440 BO-BO* l: CIRCLE! ( 18-BO) #6*6, 18 

> ,3 

4490 RETURN 

4300 '88 DESCENTEBe 

4503 IFX-10 THEN8200 

4310 LOCATE 10,0: PRINTCHRS (143) I : LO 

CATE10, l: PRINTCHRS! 143) I 

4320 LOCATEO, 1 : PRINTCHR*! 223) | :L0C 

ATE0,2:PRINTCHR*(140) I 

4330 L0CATE1,2:PRINTCHR*(223) I 

4900 RETURN 

3000 ■■ ■ •»■■■■ —— 

5001 '«»- MORT. — 

3002 ' ■■■■■■■■■■■■■ 

3003 ' 

3010 F0RN-43T033STEP-l:BEEPM, 11 HEM 

TN 

SlOO IFSCREEN(X,3)-32THENL0CATEX,3 

: PRINTCHR*! 147) I ELSELOCATEX, 2: PRIN 

TCHR*<147) ( 

320O HOS-*GANE OVER" 

3210 FORI-lT04:LOCATE6, 1 : PRINTLEFT 

*(M0«, I) I :BEEPI, 1 

S220 LOCATE 12, 1 : PRINTRIGHTS IMOS, I) 

I :BEEPI+4,2:NEXTI 

3300 GOSUB9O0O 

5S00 IF1NKEY*<}*E*THENS800ELS£RUN1 

5 

6000 " = = = » = = =" = =" = = = 

6001 ' -CARACTERES= 

6002 '-PRESENT. ..- 

6128 FONTS! 1 28) = *0 , , , 12, 124 , 1 24 , 
252,252* 

6129 FONT* ( 129 )■ "0,0, 0,252, 252, 248 
,248, 192 

6130 FONTS (130) --0,0,0,0,48, 112,11 
2,240 

6131 FONTS (131) --0,0,0,0, 116, 116, 
00,228 

6132 FONTS (132)* -0,0, 0,0, 248, 252, 2 
04,204* 

6133 FONTS (133)- -0,0,0,0,28, 28, 184 
, 184 

6134 FONT* (134) -'0,0, 0,0,28,60, 124 
,120 

6133 FONT* (135) -"0,0, 0,0,0,112, 116 
, 116 

6136 FONT*! 136) --0.0,0,0,228, 196,2 
04, 156 

6137 FONTS! 137) --0,0,0,0, 196, 196, 1 
92, 128" 

6138 FONTS (138) --0,0, 0,252, 232, 252 
,228,236 

6139 FONTS ( 139) --O, 0,0,0, 112,248, 1 
56,28 

6140 FONT*! 140 1 »'0, O, 0,0,64,200, 21 
6,240 

6141 FONTS! 141 )>'0, 0,0,0, 120,244, 1 
96,252 

6142 FONTS ( 142) -*0,0,0,0| 192, 192, 1 
2B,0 

6143 FONTS ( 1431 -*60,60,124, 124,124 
,248,248,248 

6144 FONTS! |44) -" 192, 132. 132. 12.12 
,28,28,60- 

6145 FONTS! 143) -*240, 244, 252, 252, 2 
32,124,124,60- 

6146 F0NT*(146)-*204,204, 204,136,1 
36, 28, 60,60- 

6147 FONT*! 147) --140, 140,24,24,46, 
244,224,128 

6148 FONTS! 1481 -"48, 116, 1 08 , 232, 24 
8,240,112,0" 

6149 FONTS! 149 l --216, 132,244,232, 6 
0,48,0,0- 

6150 FONTS* 1301 -"232, 232,232, 186, 1 
40,0,0,0' 

6224 FONTS(224)--180, 252, 252,204,1 
40, O, 4,4" 



So*epag*e 



SPRITY 



Ou il est demontre que le don de la lumiere. n est pas 
au gout des araignees obscurantistes. 

Philippe MINVIELLE 



1/APAlolOK ET Lf VEfJT Lu/'5A(«IT 






ORIC/ATMOS 







Ri'EH ME SEPT 

JU<r CCuiCam' 
itt* IS EM <wT 

I > pp<h'F*«. 



18 REM SPritK di.-.s |j ■:.« 
20 IFPEEK^tMJee^IbSTHEHM 
d5 k-1 kl=4E6CA K2=*FS9B K3=4EB94 

k4 = «f-ftt-H IAJTO40 

30 Klo4E76fl k2-4F0D« kJ=«.93D ka= 

■FBI 4 

40 LHLLI2 PQkE426ft.|0 DIMH*'*:" 

50 CLS 1EXI PHPERW PRIN!CHR*20, 
INK.* 

B0 REM PRESENTATION 

90 FORI"46708Tu»B7l'7 REhi-.i POktl 
J NEXT 

lyij DATA?. IS. Jl . 6 J. 60. 69- 68. 68 

ne dmta63, 63. 63,63,0.9.0.9 
iae WTft63,6£.6e.56.e-e-e-e 

130 DflTfl60,6063.31, 15.7.9-9 
140 DRTH0.0.63.63.fe3.63.0.0 

150 Dnrrtw. 0,56-60. 62, 63. 15-15 

160 L'HTHO. 0.0.0,.-, 13.31.63 

170 DflTA0.0,6,0,63.63.63,63 
180 DATR15. 15. 15. 15.63-62.69.56 
190 DflTH56.69.62.S3. 15. 15, 15, 15 
200 DRTA68. 69. 63-63, 63. 63. 69-60 
210 DHTA15.15.63.62.6056.9.0 
220 DATA69,69,69, 69. 60.60.60,6a 
238 DRTfl0, 0.63.63. 63. 63, 3. 3 
249 DRTA15, 15.63.62.60.56.48-49 

259 DftTAl. 1.0. 0.0. 0,0.0 

260 DflTfl56.56.60-60.39.30. 15- 15 
i?\d DflTH63.63.63.63.30.i9.30.38 
280 DRTfl39,38.38,36,30.3e.30.30 
296 DA.TH30. 30. 30. 30.63.63-63,63 
309 DflTR60.69.62. 30.31.15.15,7 

319 DATfl0,0,99.9.0.33.33 

320 [■•flTfll5.15.31.39.62.60.6056 
339 DRTA7,3,3, 1 . 1.0.9.9 

348 DflTflS I . 51 • 63 , 63 . 63. 63 -39-39 

359 DHTH56,48.48.32.32.9.0.0 

360 PL0T5-K.5.1 PLGT5-K -6- 1 PLOTS 



K.7.! 

370 PLOT10-K.5.5 PL0T19-K.6.5 PL" 
T10-K-7.5 

360 PLUT15-K .5- 3 PL0T15-* -6. 3 PLO 
T15-k,7.3 

399 PLQT20-K.5.2 PLQT20-* ,6.7 PLO 
T20-K.7.2 

400 P1_0T25-K.3.7 PL0T23-K,6.7 Pt_n 
T25-k,7.7 

410 PLQT30-k.5,4 PLOT 39-1', 6. 4 PLO 

420 PLOTI-K.8.4 PLOTl-k .26,4 FORI 
-2T019 PLOT1-K.0. 127 PLOT 39-1 -) 0. 



540 PLOT 11 -k . 12. , 't'flMS Lfl C ft V 
E" NEXT 

559 fl*-"PftR PHILIPPE MtNVlELLE" 

560 FOPI*JTOLEN<fl«> FOB J-38TQ8- I S 
TEP-1 PLUTJ-K,20.'MID«<fl4-I.l .+CHR 
•t 32 > ) 

579 NEXT NEXT PL0T16-K.23, -1985 " 
♦CHR4X96) UAIT200 CflLLk2 CLS IN*. 3 

589 PLOTll-K.ll."* 1 >" Pt_0T15-k-.il 

7 PLOT16-K.11.-JEU." 

59B PL0Tll-K,13."<2J" PL0T15-K 13 
,7 PL0T16-K, 13. -INSTRUCTION?." 

680 k*-KEY*,IFk*«"l , 'THEN67e 

610 IFk*->"2"TMEN630 

620 GOT 0600 

639 CLS PL0T2-K.1.29 PL0T2-k-2.29 
PL0T3-K,t,7 PL0T3-K-2.7 PL0TI9-K- 

1.19 
631 PLOT10-k,2.10 

640 PLOTll-K.l."S»rlt* d'fts la r* 
ve." PL0Tlt-K,2."SPntv dfiu !• CJ 
ve." 

659 PL0T3-K.4."Vous ttts SPri*,_i.u 

ri* ismPithiHi'f" 
651 PL0T3-K.6. "*nPo«jl* electr.«ue 

669 PL0T3-K,B,"Votre •<*«-.*,. bl*n 
entendu . d ' e9«. er " 

670 PLOT3-K.10,-df limiere tous I 
ci. lieux sombre*." 

669 PL0T3-K, !2."CoiMi»e tout bon Pr 

of essioririel " 

€99 PL0T3-K, 14. "vou» nwn*Z roti*» 
ent votre «ff*ire.* 

760 PL0T3-K,16,"L* ctvm de vofcr* 
■Mi ff-chit u«tt" 

710 PLOTS-K.ie.-cst re*Pli- H'.r. 
Untfi -.ui" 

729 PL0T3-K,29- , «*n>u««'n*. * t>t*ln 
dr* las t«MP«»." 

739 PL0T3-K,22."»»t«bli5»«r l» 1" 
«ltr# »t d*b«ri-»js»z" 

749 PL0T3-k.24.-l» c»v« d* ces b« 
b»tes Poilo**..." WFHT1509 r,0SUB85 
) 

750 PL0T2-K.4,6'PLOT3~K-4,"LF_ JEM 



.9 14.4* -'.- 49 
1-14-0.48. 32.48 



928 DHTfl3.7,15.9.9-15.7. 
0.36.36-60.56-48 

939 DflTfl3. 1-3-1 .: 
.32.48.0.29.9 

940 DATH3. 1.3.1- 
.32.48.0.0.26 

959 DflTR9.31.31 31- JI 31. '1 no 6 

2.62.62.62.62- 62. 9 
969 DflTfl9.39.3e.38.3e.30.3e 9 
979 DRTA19.7.47.9.9,47.7.19.5fl Sk 

.61.36.36.61,56.56 
989 DflTR9. 1.3-3,7. 15- 31 63 9. -32-4 

8.48.56-6862. 63 
996 DflTRl.l. 1-1. 1 . 1.1 1 32- 32- 32- 

32.32,32.32,32 
1999 DflTR9.6,ie.36.9. 18.4.8 
1919 DATR9.4, 18.9.4. 18 84 
1029 DflTRe.69.34,47.43.11.9-9-9 I 

5,17,61,53,52.36.0 
1639 RK9J-" r% r = 

1049 fl* 1 >- N r* r« 

r» 
1039 fl»<2>«" rt r* 

r»r» 
I960 RK3)-' rs r* r* 

1979 R«4 >■'' rs rs rs 

r» r» rt" 

ieee b»<5>-- r 4 r» 

r* r« rs" 

1999 A»<6>-" rs r< 



1 P#rti» • 



127 

430 PL'JT1-K,26. 127 PL0T39-1-K, 26- 
127 NEXT 

449 FORI-1T044 REHDfl.8.r.» Pl.OTft-f 
, B-C» SCHJNt'4,3. 12 PLRV8.1.1-109 PL 
HY0.0,0.y 

450 MEM 

460 DRIH8,6.t ,17.5, b. 23-7. h. 31. 5. 
u, 6, 7. 9, 12, 5. b. 16. 7. "..22. 6 ■«■ 27, 5. 
r,32,6.w 

4?0 Cfl!R6. 5- 1. 11, 7, in. 16. 5. «. 22. 7. 
t. 27. 7, », 33. 5. «. 7. 5. b. 13. 6. I. 18. 7, 
q,22,5,r 

480 ■ DflTH26, 5. b. 31. 6. k. 7,6.0,11.5- 
*,17.6.r..21.7,h.28.5-b.32.r.s.6.6. 
dil3*3, 1 

490 DHTfll6,6.k.21,5-b.32,5,v.8.7. 
i,ll,6,fc.l8,5. ... 23. 5. b. 33. *./.«. 5. 
c.12-6.* 

590 DflTfli7.r,P 27.6.ft.?.7,h.lS.6< 

519 F0R1-1TO6 PL0T9-K, 1 1 , 7-1 PLOT 
9-K.1Z.I MRIT36 

520 PLOT10-K.11.19 PLOTlfl-k.1210 

530 PLOTll-K.ll.-DftNS Lfl C R V 



751 PLQT3-I 
n« lor»4uc vous" 

76W PL0T3-K.8,-»v*x <llu«i« l*s 4 
Pl«fomU«r»." WflIT506 

778 PLOT2-K.10.6 PL0T3-K. 18, "l £1 
COMfiflNDES. 

780 PL0r3-K.12. M Utilis<?i 1*5 cur* 
*<jr» Pour vews " PL0T3-K, 14 . "d*(M . 
c«r." 

799 UAIT500 PLOT 3-1- ■ . \f. "Tout cm*t 
»ct <v«C un« *r«i9n««" 

809 PL0T3-K. 18-"ww* Ot* -nt v»«, 
" MPIT599 

819 PL0T3-K,29,-Rw sol «o»^ n* fn 
'ivti !•* »vlt«r" 

926 PL0T3-k.22."«i.j'*n uuUnt P>r 

6>s*us ow *ti voms" 

836 PL0T3-K,24.-«ccroch« f >t » un P 
UfOTmi#T- 1 "PL0T3-l' . 26. "BONNE CHHN 
CE. . . " 

849 UflIT586 G0SUB859 = C0T0879 

859 F0RJ-4T024STEP2 FOPI-3T039 PL 
0TI-K.J,127'PL0TI-1-K, J.32 SOUND4- 
1.16 

869 PLflve.1.4.130 PLAY0.0.&.0 NE>: 
TPL0T39-K,J,32 NEXT RETURN 

876 CLSPL0T14-K,13.12PL0T15-I- 1 
3.6PL0T16-K, 13. ■READY t 

966 REM JEU 

910 INK5F0R>i8798TOtB79F REflDJ 
POKE I. J> NEXT 



1110 W(B)«" rs r 

r* 

1129 R* 9 '-" r 5 r. rs 

r»" 

1139 CLS FORJmeTOl PLOTl-k. I 18 N 
EXT 

1140 PL0T1-K.2.18 PL0T3Ht.Z.?9 PI 
0T4-K,2,7 

1150 PL0T3-K.2.-SC0RE PONIJ 

S 999 VIES 5" PL0T28-K.2.7 PL0T1 
7-K.2.7 

1169 PL0T36-K.2.18 PL0T37-t - > P 
L0T38-K.2.18 

1179 F0R1-3T04 PL0T1-K. 1.18 NFXT 

1189 F0RI-13TQ14 PL0T1-K. II? PI 
T2-K.I.1 NEXT 

1199 PL0T3-K.13."9h9b9h9h9h'5.h^^. 
qh9H9H9h9h9h9h9b9h9 " 

1200 PL0T3-K.14."h9li9h9h9h9hoh9tva 
h9h9h9hWl9h«H9h9h9h " 

1210 F0RI«23T026 PLOTl-k I 19 
T2-K.I.1 NEXT 

1229 F0RI«23T025STEP2 PLOT<-C I. H 
9h9h9t^9h9K,9h9h9h«h9h9h9ti9h9h9h9h9H 
h" 

1239 PLaT3-K.-I*l,"h9h9h9h9fl9h9h^. 
9h9h9h9r^h9h9h9h9h9H- - NEXT 

1249 1*5 J*8GOSi_« 1250 1-1*19 >J 
*10iGOSU61250 C0T01269 

1259 FORN-ITOJ PL0T32-K,N.7 PL"T^ 
3-K.N, -t»o p NEXT RETURN 

1269 PL0T8-K. 8,1 PLOT 29-K . 8 - 1 PLiI 
T18-K, 18.1 PL0T26-K- 18- 1 

1276 fl-5 6-9 G0SUei298 B=>2I C09UTI 
1299 R-15 B-U ■GPSUB1296 B"21 Gf'Sil 
B1296 

1288 BOW L'0 KMf* L ' t .O=fl H c -= 
1000 VI "8 GOT01396 

1299 FORI-RTOfl+2 PLOTB-K . I . "r,.-," II 
EXT PLOTB-K, fl*3 - " In." PFT1JRH 

1399 PL0T2-K.93 PL0T2-C. 10-6 PLu 
T2-K ,11.3 PL0T2-K ,12.6 

1319 PL0T2-K.19. 3 PLOT:-lc.20.6 PL 



0T2-K.21. i PLOT^-f .22.6 

1320 REM I1usi4u* 

1330 F0RI=1T021 PEH[<fl.B.' WiSIi 1 
B.fl.10 PLRY1. 0.0,9 -MHITL PLflYO.B 8 
.0 NEXT 

1349 DflTfli, 32t' 3. 3.29.5. 3-^e.h. 3 
,49. 19.3-20,8,3.40,6.3. 15.6,3- 15-6 

3,15 

1359 Dflrfl6.3.39. 19,3.29-8- *■ 2" 5. 
3. 29. 3. 3. 20. 13. 48 .6-? l c - ■ ' r « 

3-15-6.3.40 

1369 DflTfll0-3.20.83.60 

1370 A-VBF1C Y»»fl»*L 1 IN»I-SC»9 
1399 PL0T3-K,12,T«" PL0T37-I I. 

■■r»" PL0T3-K- 22. "rj" PLOT '.?-> ? 

1390 PL0T5-K.21 ."»b" PL0T5-K.22." 

cd" UA1T50 

1490 REH Pro9rs»t(. 1 c PrmciP'l 

1410 IFPEEKCf298 w#flCTHENMo2 i^otn 
1460 

1429 IFPEEm«208'-«B':THEHH— 3 f.fiT 
01469 

1439 IFPEEKt 9298 j-*9CTHEH 1491-1 

1440 IFPEEK<fl»' 2*IN>i=*72THEN!'i5li 

1459 G0SUB1599 E>0KE' R ' . #6665 WHIT 
5 DOkE< H >. 46463 COTO1410 

1460 IFPEEK(A-H>»472THEN155A 
1470 DOKEfR',B2020 POKE' R-4H ■. •>n 

29 fl=fl-H D0KE< H > ■ 464R3 DOKE' R-48 • 
■6261 

1499 G0TO1459 

1490 G-PEEMA-168 > G0T0168A*'! 

1599 CRLLK1 PL0T5-K.22 fl«, L • Alt* 
LEFTWflKL >,2 » ft* L >-MIW R»' L >,3 
32 >*fll« 

1518 PL0T5-K. 12-X* R2MlGHT»OW- 
2 > X4-fl2«+M I D»< X» . 1 . 36 * 

1529 60=B0-1 B«=STR«< PO > 1FB OTME 

NW'-ew" 

1539 PL0T24-k.2.B« OIHT'PHO' 1 *2 



*1 

1540 G0SiJB1549*C CHLLk3 RETURN 

1541 DOKECiBCFI >,46D6t Dr*E'#BrC9 

I.46F6E RETURN 

1542 D0KE( »BCF1 ..■2020 D0KE> •» C9 
>,»6D6C RETURN 

1559 SHOOT F0RI*1T03 K» L 
696R WHIT39 D0KE<fi-49) tS261 UifllT* 
9 NEXT 

1569 VlaVI-t VI«=iTR«'VI 1 PLMT34- 
k ,2,STRKVI ') CftLLK4 

1561 DOKE(ft-40i.«?i ] i2» F'*'1 ='.TCi > 
PLOTI-k',22.32 PLOTI-V . 1,- NEX1 

1570 lFVI=0THEN201OhL^fcfl»- L'"Y« X 
■»V« GOTO1370 

1632 REM $« u t vide 

1640 Cftl.Lkl POKE'fl^. 42928 E>0hE<«- 

!,- ■ ■ ... 8 H = H-Hll (a.* E. H ■ 16463 

1658 i-M.fc,n-d.t. t626l 'ALIK3 WRIT 

1669 D0KE< R ) ■ «292fl P0KE< fl-49 ■ ■ *S9 
28 R>4H88 D0KE(A>>86463 DCKE<R-4H1 
■6261 

1679 CALLK3 &OTO1410 

1788 REM Saut l*M>e 

1709 P=PEEk>H-12rt . Q0TO17I3 

1718 C0T01779 

1713 POKE'R >>02e26'DOKE< B-49».4?9 
,& fl-fl-80 D0KE<fl •■6463 K*F'fl-4n • 

46261 

1726 IFP=112THEN174HFl t .FTiifi'l'lTi,| 
9 S0UN01. 1*199.499 PI HV] . 1 . -".. !'. 

17._- c > PAPER7 WA1T5 PRPER" WfllT^. I* 
XT PLflVe, 0.0,0 

1739 S«S+1 IF8MTHENG0SI 
»9 PI DT25-I >2-"999" GOTO 1370 

1748 G08UB158e IFPEEtCi 4288 ^■B4fH 



EH 1756 

1745 00KE- fl > - «66S5 WRJT5 WF'h, 
46463 GOTO 1749 

1750 DO* E'fl.- 42820 COKF' fl-49 ..•?« 
29 fl-R+89 t'OkE' R i.«6463 POKE- fl-49 • 
-46261 

1760 IFPEEK''ft-l60 «188THEHIjOKFi fl- 
120 ••7170 

1762 G0T01419 

1765 REM S»»» *t*9B 

1778 [»>-£( fl 1 ■ 4^020 DUkE- A-40..429 
26 ft=fl-96 DCWEt fl).»6463 &•'»■£• fl-4 
.46261 

1775 IFIN— 1THEN!776EL^E17.? 

1776 GOSUB1500 1FPEEK' i>08 -MB4TH 
EN 1758 

1777 D0KE'ft),»6665 MRIT5 {'0KF>fl'. 
46463 GOTO 1776 

1779 IFS>>2THEH1788EL5E1776 

1780 PLflY9.1,8.9 FOP1=30TO10STFP- 
1 S0UHC4.I.12 UA1T4 NEXT PLAY0.0.0 

9 

1799 FORI = 1TOI9 D0KE<H>,«463 DOI 
E(A-40>- 46261 WAIT20 

1899 LX*Eifl>. 42929 DOtE' R-40 >.426 
26 WHIT28 NEXT 

1819 fl»fl-499 DOKEf fl •-■64- '■'■ tXWfl 
-49). 46261 UAIT39 

1928 GOSU81508 IFPEEk' #208 'MB4TI 
EN1N— 1 GOTO1750 

1838 t>Ok£'fl>,«6665 URIT5 DOt- E« fl > 
46463 GOTO1820 

2999 REM Flr> de P«rtie 

2919 CLS CALLk2 PRIHTCHR4> 20 ■ PR I 
NTCHR«<6> IF£O>000TH£N2960ELSE2l50 

2029 WAIT39 PLflY9.7,5I9 FOPI=IT0 
36 S01JMD4. 1*1000.13 NEXT PLBW.9-8 

.0 

2030 S0-S0+4C*B0 S08-STRWS0* PLO 
T12-k,2.S0*L-L»l IFL>9TMENl=l 

2040 POkEffl-49..t2920 t'«F'H'.«.'fl 
29 F0RI-5T036 PLOT I -K . 12 . 32 PLnTI- 
K-22-32 

2950 PL0T1-K.9.3J" PLOTI-K . 19.32 N 
EXT S-0 RETURN 

2969 INV2 IFS0,H^.THfu:'t.7t»Ft -.F .>f.ri 

2979 lNPtJT"Votre Prenotn S.V.P."iN 
4 D1«LEN'N« • 

2989 CLS S0*-STR»'S0- 

2999 F0RI-1T02 PLOTl-k. [ ?f< Pi tn I 
-k.1,10 MEXTPL0T2-* 17 P|_0T2-> ^ 
.6 

2199 PL0Tl3-k.l."deilUi.ir l»itur" 

PL0T13-k.2,"Meilleur Joucwr' 

2119 F0RI-9T0I9 PLOT! -Y . I . 17 PLOT 
2-k.I.3 PL0T3-K.1.19 

2111 PL0T4-K.I.N4 PL0T0I*7-K,I,16 

2129 NEXT 

2139 PL0T4-K,12."Voi..s ,er^7 'fe . 
*U»er le wetlleur" PL0T4-k 14 "< 

ORE <» •" 

2140 PL0T16-K,16.SO»-»- PTS" GOTO? 
155 

2159 PL0T14-K.13.12 PL0T1S-K 13. 

PL0T16-K-13.-GAME OVER- 

2155 ET»-"» * t t * 1 

8 • S 

2169 PL0T2-K.26.7 PL0T3-K .26. "BPP 
o»tz sur 1 Pour une *utre P»rtl« 

2176 PL0T2-k.?.ET« F0.OT2-r.26.ET* 

UfllTie 

2180 E14-LEFT4XET4.1 ) ET*«MM'*<ET 
*.2,37)+E14 

2199 K*^KEY» IFkr*-"l"THFNCi ERR 1 
T019 

2299 G0T02179 ' 




V CANON X07 

Suite de la page 5 

6225 FONT* (225) -"128, 132,4, 12, 12,2 
52,252,248- 

6226 FONT* (226) = "236, 204,204, 132, 1 
28, 0,0,0* 

6227 FONT* (2271 =""28, 60, 252, 2 '.6, 0,0 

,0,0- 

6228 F0NT*(22Bl=-244,244, 108, IOB.0 

,0,0,0- 

6229 FONT* (229 1 =-236, 132,236,220,0 
,0,0,0* 

6230 FONT* 12301 -="128, 192, 192, 128, O 
,0,0,0" 

6231 F0NTS(231>~~4,4,4, 12, 12, 12,60 
,124- 

6232 F0NT*(2321=-240,240,240,224,2 
24,248,248.240* 

6233 FONT* (2331 ="56, 120, 120,224,0, 
0,0,0* 

6234 FONT* (234 1 ="60, 48, 0,0,0, 0,0,0 

6235 FONT* 123516- 120, 0,0, 0,0, 0,0,0 

6236 FONT* (2361 ="124, 248, O.O, 0,0,0 

.0- 

6237 FONT* (237 ls-240, O,0, 0,0, 0,0,0 

6500 •========== 

6501 '=PRESENT.- 
A502 •«==:-===== 
6510 CLS 

6515 LQCATE4.0 

6520 F0R1=128T0142 

6530 PRINTCHR*(I1 J 

6540 NEXT 

6550 L0CATE4, 1 : FORI= 143T0150: PRINT 



0USTf OH B *iSCe/ >^L_^ v 

fk?M! he. «e T(?ycte w?) - 





CHRS( I 1 I :NEXT 

6560 F0RI-224T0230:PRINTCHR*( I ) S IN 

EXT 

6570 LOCATES, 2 : FOR I =231 T0235: PRINT 

CHRC( I 1 1 'NEXT 

65B0 LOCATES, 3! PRINTCHR* I 2361 ; CHR* 

(237) I 

6590 LINEI7B, 161 -<B1 , 16) 

6600 LOCATEO.O 

6610 LINE ( 105, 14) - I 107, 14 > : L I NE ( 10 

6, 14) -(106, 17) 

6620 LINE ( 109, 141 - ( 109, 17) :LINE( 1 1 

3, 141 -(113, 171 IPSETdlO, 15) :PSET ( 1 

12, 15) 

6630 PSETi 111,16) 

6640 L1NE(1,1)-(118,1):LINE-<118,3 

o) :line- ( 1,30) :line- (l, l) 

6650 LINE 180,25) - (80,28) :PSET (81,2 

5) :PSET(81 ,28) 

6660 PSET (63,28) 

6670 LINE (88, 24) - (88,28) I PSET (89,2 

4) IPSET (89,26) :PSET (89,28) 

6680 PSET(90,25) :PSET(90,27) 

6690 PSET 192,25) :PSET (92,27) :PSET( 

92,281 : LINE 193,25) - (93,281 

6692 LINE (95, 25) -(95,28) IPSET (96,2 

8) : LINE (97,25) -(97,28) 

6694 PSET (99,27) IPSET (99,28) :LINE ( 

100,25) - ( 100,28) 

6696 LINE (102,25) - (102, 2B) : PSET (10 

3,25) : PSET (103, 26) :PSET (103,28) 

6698 LINE ( 105,25) - (107,25) : LINE (10 

6,2S)-(106,28) 

6700 '«««= = = » 

6701 ■=MUSI9UE.= 

6702 ■========== 

6703 '# COPYRIGHT » 
*704 '»» SCIACCO •« 
6705 * **STEPHANE . ♦♦ 



6710 REST0RE6800 

6720 FORI-lT0351READA,B:BEEPA,B:NE 

XT1 

6785 BEEPO, IO: BEEPO, 10 

6790 RETURN 

6800 DATA 10,6,11,4,13,4,18,10,10, 

6, 11,4, 13, 10, 10,6, 11,4, 13,4,20, 10 

6810 DATA 10, 6, 11,4, 13,4,22,6,20,8, 

10,6, 11,4, 13,4, 18,7,20,7,22,6,23,8 

6B20 DATA 13, 6, 13,6,22,8,20,6, 13,6, 

22,8,20,6, 13,6,23,8 

6830 DATA22,8,20,8, 18, 12 

7000 ■•»•»» ■■•■•»■■ 

7001 '=. .GAGNE. .- 

7002 '——«««— 

7005 CLS 

7006 TMP*-TIME* 
7090 F0RI-0T010 

7100 LINE (1*1, 1*I)-(118-I,1+I) :LXN 

E-(118-I,30-I) 

7105 BEEPI, 1 

7110 LINE- (1*1, 30- I) "LINE- (1+1,1+1 

1 tBEEPl , I 1NEXTI 

7200 LOCATES, l:PRINT* VERY GOOD ' 

' "I 

7830 G0SUB6700: CLS: G0SUB9O00! LOCAT 

E0,O 

7850 L0CATE4,0:PRINT*U0TRE TEMPS:* 

i : LOCATES, 1 IPRINTTMPS 

7870 END 

8000 '========== 

8001 *ETAGE INF. 

8002 ■========== 

8100 'descente 

8105 ad=t: da=o:et=i 

8110 g0sub8500:g0sub6510:g0sub8570 

: g0sub8500: g0sub8520: g0sub8570: gos 

UBB530 

8120 GOSUBB540:GOSUB8550:GOEUB8570 



:G0SUB8540:G0SUB8560:G0SUB8570:X=X 

♦l:G0T01520 

8200 ' MONTEE 

8205 da=ad:locateio,2:print- "1 

8210 g0sub8540:gosubb56o:g0subb570 

:G0SUBB540:G0SUBB550:G0SUB8570:G0S 

UB8530 

8220 GOSUBB500:GOSUBB520:G05UB8570 

: G0SUB8500: G0SUB8510: G0SUB8570: ET= 

o:x=x-i 

8230 L0CATE1O, l.-PRINT* "|:L0CATE10 

,2:PRINT" -; :L0CATE10,3:PRINT* ■ 

G0T01520 

8500 LOCATE IO, 1!PRINTCHR*( 145) ( : LO 

CATEIO, 2: PRINTCHR*! 145) i 

8505 L0CATE10,3:PRINTCHR*( 145) | : RE 

TURN 

8510 L0CATE10,2:PRINTCHR*(143) i : 

TURN 

8520 L0CATE10,3:PRINTCHR*< 143) [ : RE 

TURN 

8530 CLS:PRINTP*I : LOCATEO, 3: T=DA: P 

RINTSOL*(T) [ 

8535 F0RI-1T06: LINE (113+1,24) -(113 

+ 1,311 ! NEXT I : RETURN 

8540 LOCATE IO, 0:PRINTCHR*( 145) J :i 

CATE10, 1 :PRINTCHR*(145) i : RETURN 

8550 LOCATE10,0:PRINTCHR«(143) ( :i 

TURN 

B560 LOCATE10, 1 :PRINTCHR*( 143) ( : RE 

TURN 

8570 BEEP4, 1 : F0REMT*0T030: NEXTEMT: 

RETURN9000 * =«« = = = = = 

9001 '- SCORE = 

9002 •========= 

9010 F0RI=0T07 

9020 L0CATEI,3:PRINT* Score: -|SC{ 

9030 BEEP 1*4, I : NEXT I 

9040 RETURN I 



ATLANTEAT^ 

Dans votre EXL transforms en aquarium, offrez une ( > 
"grande bouffe" a un pauvre petit poisson affame. 



t*?»&T$)EXELVISION-EXL 100 

POoPToiTOor; 




Jean-Luc et Frederic FARGES 



Mode d'emploi ; 

Les regies sonl dans le programme 



2 'JEAN I Ui. 

3 I FREDERIC 

4 • PRESENTFNT 

5 ' POUR EXL 100 

6 ' ATLANT -EAT 



' INITIALISATION SON ET GRAPHISME 

DIM PL(128> 
! FOR 1=0 TO 12B:PL( I >=200:NEXT 
t CALL F'OKE(506BB, 165,8,6, 10) 

CALL P0KE<43156, 198,0) 

I ' POISSON JAUNE 

I CALL CHAR(50,"070F3F6FFF3FFF7F3F1F" 

l CALL CHAR(51 ,"EOCOEOF1FE:FFFBF1F0E0" 

i CALL CHAR(52,"070307SFDFFFDF8F0703" 

CALL CHAR(33,"E0F0FCF6FFFCFFFEFCF8" 

: ' LES MONSTRES 



' 181B1B1B3C7EFF33FFFF" 
E7C3B1FF7E3C183C7EFF" 
183C66E7FF7E3C6&DBFF" 
FFFFDB667E3C1B3C7EE7" 
04EEBFFD5F5F4E642E60" 
'44CE9F909F3F8E444E00" 
2443A581423C7E0BFFE7" 
'C37E3C4281A543240000" 
1E177FFBE303071C3878" 
'F0F1E1E3E3E3E67C3800" 
'FF99FF7E18183CFFFFFF" 
'FFFF7E7E3C3C1B1B3CFF" 
060F13EFAFA6E64S2616" 
■0E060C163066C3C1FF7E" 
203E5EEC9C3C3D3F3F3F" 
'3F3D1C1C4C4C6C3C3800" 
'101010103B7C06FEFEFE" 
TEFC7C7C3B1010387CFE" 
' 183C7EFFDBA5DBFFFFFF" 
E781FF7E7E3C3C 1 81800" 
1B3C7E0BFF663C181B18" 
'181818iei8183C7EFFe7" 
7EFF99FFE7C37E183CA5" 
E7663C3CG6E7FFFF0000" 
10381038109810103834" 
FEFEFEFE7E3810387EFE" 
TFFFFF101010103834FE" 
FEFEFE7C3810387CFEFE" 



0O003C42B181423CO0O0" ) 
18244281818181422418") 
7F01 010101 0101010101") 

"FE80808oaoaoaoeo8080" 

"0101E17139100F070000" 
"B0808080808080000000" 
"183CE-6C3B181C3663C16" 
"C3C3C3C3C3C3C 366 3C 1 8" 
"1B3CE&C3C1FFC0&3361C" 
"FCC2C1C1C2FCC4C2C1C1" 
"3C43406000003E21 1000" 
"0202C2BC804442A2443C" 
•'7886670A0A0A0570836 1 " 
"30OBF00000O0OO3008F0" 
"32749F0F0A0A0A3B6A6A" 
"70F8FCFE0F077F87077F" 
"3614OB3B7BCA0AOAOE0E" 



CAI I 


CHAR (66, 


CALL 


CHAR(67, 


CAL i. 


CHAR(6B, 


CALL 


CHAR(69, 


CAL i 


CHAR<?0, 


CAU 


CHAR(71 , 


CALL 


CHAR<72, 


TALI 


CHAR (73, 


TALL 


CHAR<74, 


CALL 


CHAR (75, 


CALL 


CHAR<7&, 


CALL 


CHAR(77, 


CALL 


CHAR(76, 


CALI 


CHAR<79, 


CALL 


CHAR<80, 


CAI I 


CHAR<81 , 


CALL 


CHAR(82, 


CALL 


CHAR < 83, 


CALL 


CHAR<84, 


CALL 


CHAR<83, 


CALL 


CHAR* 86, 


CALL 


CHAR (87, 


CALL 


CHAR (88, 


CALL 


CHAR (83, 


CALL 


CHAROO, 


CALL 


CHAR(91 , 


CALL 


CHAR < 92, 


CALL 


CHAROS, 


' PRESENTATIO 


CALL 


CHAR (97, 


CALI 


CHAR (98, 


CALL 


CHAR (99, 


CALL 


CHAR (100 


CALL 


CHAR* 101 


CALL 


CHAR (102 


CALL 


CHAR ( 103 


CALL 


CHAR (104 


CALL 


CHAR (105 


CAI 1 


CHARMOE 


CALL 


CHAR (107 


CALL 


CHAR (1 OB 


CALL 


CHAR(109 


CALL 


CHAR( 110 


CALL 


CHAR(111 


CALL 


CHAR(112 


CALL 


CHAR(113 



04 LOCATE (12,10):PRINT "b":l 

31 > t PRINT "b" 
03 LOCATE (11,10) i PRINT i ; 

31 ) t PR I NT "b" 
06 CALL C0L0R*"1Gfc">;L0CATt 




107 

108 

103 

1 10 
1 1 1 

113 

1 13 
! |4 
1 IS 
i 16 
117 
1 1H 

1 19 



12S 

130 
131 
13? 

1 ia 

134 



i as 

140 



CALL POKE (233, 45): CALL POKE* 238 ,249, 132) 

CALL COLOR("OCB">:L0CATE (21,5) 

PRINT "Vaultz-vou« !■■ r»gl*« du j.u »":CALL CO 

LORC'OCE") sLOCATE (22,13) 

PRINT "(1-OUI 0^NON)":PAUSE 1:CALL PQKE*259,45> 

RE*-KEY* 

IF RE*="1"TH£N 118:IF RE*="OTHEN 133 

IF RE*-"0"THEN 133 

bOTO 111 

•REGLE DU JEU 

CLS "8BB" 

CALL C0L0R("0RBLF");L0CATE (1,9):PRINT "RREEGGL 

LEESS DtiUU JJEEUU" 

PAUSE 1 

DIN A»t13> 

A*(2)* , 'V0US ETES LE POISSON JAUNE EN HAUT OE" 

A»*4)-"L'ECRAN.AU FOND DE LA HER SE TROUVENT " 

A*(6)-"DES ALCUES VENIHEUSES ,DES POISSONS ET ■■ 

At(B>-'- DES MONSTRES RADIO ACTIFS." 

A»(10)-"P0UR SURVIURE VOUS DEVREZ LES HANGER" 

A*(12)»"MAIS ATTENTION A CHAOUE PHASE DE JEU " 

A*(14)="V0US DEVREZ EN DEVORER D'AVANTAGE POUR" 

A*(16>-" NE PAS MOURRIR HAHAHA''..." 

A*(18>="V0US VOUS DIRICEREZ AVEC LES MANETTE5" 

A*(19)«" OU LE CLAVIER." 

FOR 1-1 TO 19:F0R J»1 TO LEN(A*<1>) 

CALL COLOR("Obb"> iLOCATE [1*1 , J) :PRINT " " 

CALL C0L0R*"0WB"):L0CATE ( I ♦ 1 , J) : PRINT SEC*(A«< 

I) ,J,1) 

CALL P0KE(238,33,15Z);NEXT:CALL POKE( 253, 43) : 

NEXT 

CALL CDLOR("OCB"):LOCATE (21,1) 

PRINT "APPUYEZ SUR UNE TOUCHE POUR LES OPTIONS" 

P*-KEY* 



73 CALL CHAR( 1 14, "87OFFFFEFC1BOO000000" ) 

74 CALL CHAR( 115, "020408303325EDEDCDCD" > 

75 CALL CHAR(116,"OOOOOOCOEO7F3EOOO0O0"> 

76 CALL CHAR(117,"CDCDCDEDE971793F0F00") 

77 CALL CHAR(11B,"7EFE0000000106FCrOFO"> 

78 CALL CMAR(119,"32749F0F0A1A3£;6A6A36") 

79 CALL CHAR(120,"70F8FC8E077F87077F87") 
BO CALL CHAR(121,"1A06060A3A7ACA0A0E0E *> 

81 CALL CHAR(122,"0FFFFE7C6163763E1C1B") 

82 CALL CHAR(54,"C03F1F070E1A1A1A1A3A"> 
B3 CALL CHAR(55,"00E0FCBE8E87B?B7BFC7" ) 

84 CALL CHAR(56, "7A3A1A1A1A2242870F10") 

85 CALL CHAR(37,"B7BFC787B787S6FCF800 " > 
BE CALL CHAR(5B,"3F7FBD1S35E5£DEDEDED") 

87 CALL CHAR(59,"060E3EOE0E0E0E0E0E0E") 

88 CALL CHAR<60,"EDE0EDEDED6371330F0F") 

89 CALL CHAR(E1,"OE0E0EOE0E0E1F2FCEC4") 

90 CALL CHAR(E2, ,1 183C7E3C181B3C7E3C18") 

31 I BannBnnflflflnBnnnnBnnnnnanBEannnnnnnn 

32 'BBBBBBPRESENTATION DU JEU BBBBflBBBB 

33 ' BBssnBnooBnnnnDnniinnnnaanBntiBnnBitna 

34 CLS "GB6"lCALL COLOR ( "0MB" > 

95 LOCATE (1,10i:PRlNI "j Mn I uc I Fre.Jcr 
rlc n lPAUSE .5 

96 CALL P0KE(2S8,24S, 132) 

37 LOCATE (3,17>:PRINT "FARGES" : PAUSE .3 

:CALL C0LOR("OYB") 
98 CALL P0KE(253,45> :CALI V OKF I ^SB , 249 , 1 

32) 
93 LOCATE (7,15):PRINT "PRESENTENT " : I *!)■= 

E .8:CALL C0LOR( "OCEiHl " ) 

100 CALL P0KE(259,45) :CALL POKE t Z3fl, 175j 
132) 

101 LOCATE (11 ,11):PRINT • AAT ILL AANNT T 
EEAATT" 

102 LOCATE (12,11 >:FRINT " AAT Tl l AANNT 1 - 
EEAATT" 

103 CALL C0I.DR("1GB") :LQCATE (10,10>:>M 



OPTIONS 

CLSiCALL COLORC'OCBHL") 

LOCATE (13,10) iPRINT "AATTLLAANNTT- -EEAATT" 

LOCATE (16,10) :PRINT "AATTLLAANNTT - -EEAATT" 

CALL C0L0R("1C6"> :LOCATE (16,9):PRINT "b"iLOCAT 

E ( 16,30) :PRINT "b" 

LOCATE (13,8>:PRINT "b":LOCATE ( 15, 30) :PRINT 



LOCATE (17,9):PRINT "»a 
LOCATE (14,9):PRINT "h 
CALL CtlLORC-Orei ■■) :LOCATE (1,3):PRINT "CCHHOOII 
XX ODEtSS OOPF TT110UNNSS" 
S»-RPTS<CHRt(4) .36) 
CALL COLOR! "ObB") : LOCATE (2,2)lPRINT S«:CALL CO 

LOR("ORBL"):LOCATE (6,3) 

PRINT "NNOOMMBBRREE DOEE JJOOUUEEUURRSS '■>: I 

"iLOCATE (9,15) 

PRINT , '(<11//22))" 

NBR»=KET* 

IF NBR«'"1"THEN NBR>1:G0T0 1SB 

IF NBR*="2"THEN N8R=2:GOT0 160 

GOTO 154 

CALL C0L0RI"1H8">:L0CATE ( 21 , 12) : PRINT "*T g h 

i h j * I " 
I LOCATE (20,12) :PRINT "cd" : PAUSE 3:GOT0 162 
> CALL C0L0R("1N6"):L0CATE ( 21 , 1 2 ) I PR INT "»f g h 

1 h j »n" 

LOCATE (20, 12) : PRINT "cd" (PAUSE 3 

AA»=RPT»(" ",40) 
i fOR 1=7 TO 9:CALL COLOR * "OBB" ): LOCATE (I,1)!PRI 

NT AA«:NEXT 

FOR I 20 TO _'1:L0CATE H,1):PRINT AA*:NExr 

CALL COl ORC'ObBL") 

N1t>"1l! :PDEEE:BUUT T AANNT T " 

n:~%- "22 1 : AAMMAATTEEUURR " 

M3**"33: :FPRR00rFEESSSSI100NNNNEELL H 

N4»-"44 : :KKAANH1 IKKAASSEE " 

LOCATE (E,1):PRINT M HlM2»tM3«tM4» 

OP»=KEV* 

IF 0P»="1"THEN D< 1 )'D(2)^5:G0T0 177 

IF 0P*="2"THEN D(1)=D(2)=7:C0T0 178 

IF 0P*="3"THEN D(1 )=D(2)=10:G0T0 173 

IF 0F«="4"1HEN D(1>«0<2>*1S:COT0 180 

GOTO 171 

CALL COLOR <"OW&LF"> :LOCATE (6,1>;PRINT N1»:GOT0 

181 



"OUDI.F ) : LOCATE < 7,1 ) ; PR I NT M2»:COT0 
•OWBLF' a OCATE (8,1):PRINT M3*:GDT0 



CALL COLOR 
181 
i CALL COLOR 
181 

CALL COLOR* "OW&l-f . :_[1CATE 
CALL COl 0R< "ORE ' :. JCATE <2 
SUR UNE TOUCHE PCUB jOUER" 
PO»"KEV* 



3,1) i PR I NT I14» 

,2):PRINT "APPUYEZ 



P(2)=0 

L(1 )=7:L(2)=2E 
CLS "Ybb":CALL COLOR* '■OBB"] 

CALL HRONC'B" ,4,1) :FOR 1 = 1 Tu 3:t.0CATE (I,1>lPF 
INT RPT»*CHR«*32) ,40 > iNEX"' 

CAI l COLOR* "ORB") tLOCATE ' i . i < :I'RI NT "JOUEUR 1" 
: LOCATE (2. 1 ) iPRINT SCORE : ' 
LOCATE (3,1>:FRINT Wl£S 
! CALL COL0RC1Y6"):! OCA'E ' 3 , L ( 1 ) . 1 ) :PRINT RPT»< 
CHR**50) ICHR»(51 )f " 3. 
! } NBR= 1 THEN ' "j- 
CALL COLOR* "ORE' 

LOCATE (1,?0>!PRIN1 lOlllUB 2'-:LQCAlE I2.20HPR 
INT "SCORE :'■ 

i HCATE (3,20) :< '■ INI •■UlLSi" 

CALL COl ORl "1Y|: );LOCATE * 3 , H 2 ' 4 1 ) : PR ] NT RPT»( 
CHPt(50)ICHR»t51 >l ,3) 

.: CE ■ V. 1 i -i:V .■ ■ .< 

i B*-"DDDD*F.3r2BECF(C'D6E!DEADCeB59ADEI OBHC* , teOFEC>E 
02254006. 

> ( , i , 0:'- . - ■) '"'«■ ■ CO! OR" 3. ■ " • 



201 DIM XI350) 

202 I OR 1^1 10 13:X( 1 )=0:NEXT 

203 READ C»:IF C*^"(" IN"THEN RESTORE : C < 1 ) =66 : C ( 2) -66 : D ( J) =■ 
2:G0T0 201 

204 1=19 

205 READ X* I) 

TOE, IF XtI)-0 THEN LOCATE ( 22 , 1 > : PR INT : PRINT : PRINT : GOTO 3 

207 CALL C0LOR*C*> 

::0S LOCATE <22,X(I) ):PRINT:PRINT T AB( X( I ) ) ; CHR* ( C ( J ) ) ; X ( I 

( I) 

203 PRINT TAEMX( I ) ) ;CHR«(C( J).1 ) : X ( I .2) =-'X ( I ) ; I - I * 2 

210 CALL COL0R("1Yb") 

211 IF J=1 THEN CAI L KEYKAiB) 

212 IF J^2 THEN CALL KEY2(A,B) 

213 IF A=131 THEN 21S 

214 IF A^123 THEN 218 

215 XJ=XJ.(A=131 AND XJ>1) 

216 LOCATE (4 , X J ) :PRINT "23" 

217 GOTO 220 

218 XJ^XJ-<A=123 AND XJ*33) 
213 LOCATE <4,XJ-1 ) :F-RINT "45" 

220 IF X<I-1B)-XJ THEN CALL SPEECH ( "L , " IB* ) ; P( J ) =P < J) . 1 

221 CALL COLOR("ORB") :LOCATE ( 2 ,l_ ( J ) ) ;PRINT S(J).P(J> 

222 IF K331 THEN 205 

223 IF Pt JX(120*(D* J)»N( J) ) > THEN 223 

224 GOTO 242 

226 'DECOMPTE OE VIE 

227 i 

228 V( J)»V( J)-1:S( J)-8(J).P(J) 
223 CALL COL0R("OBB")iL0CATE (3,1):PRINT RPT*(CHR*< :J2 ) ,40 

L COLOR* "ORB") 

230 LOCATE (3,1):PRINT "VIES:" 

231 IF NBR=2 THEN LOCATE <3,20):PRINT "VIES" 
CALL COLOR ("lYB") :LOCATE (3,L( J) t 1 ) :PRINT RPT* <CHR*(50) tCH 



(CAI 



Rt< 



)I" 



:READ Z*:NEXT:XI= 



IF V(J)(-0 THEN 251 

IF NBR-2 AND J-1 THEN J«2:C0T0 237 

IF NBR-2 AND J-2 THEN J-1:G0T0 237 

IF NBR-1 THEN RESTOREiFOR 1=1 TO 137*N( 

1 :GOTO tlW 

RESTORE:FOR 1-1 TO 157#N( J) :READ Z*:NEXT:XJ=1 

CALL COLORC'IYB") ILOCATE ( 3 , L ( J > t 1 ) : PRINT RPT* ( CHR*( 50 ) ICH 

fc*<51 )t" " .V( J)> 

GOTO 20O 

I 

•BONUS 

S(J)-S( J)*300.P(J) 

CALL COLOR("ORC"):LOCATE (2,L( 

PRINT S(J) 

C( J)»C( J)«2:N( J)»N( J)*1 

GOTO 200 

iFIN 7 

IF NBR-2 AND J-1 THEN J-2iC0T0 253 
IF NBR-2 AND J-2 THEN J-1 
IF V(J>-0 THEN 363 
GOTO 237 

'EMPLACEMENT DES MONSTRES 




DATA 1Rb, 1,0, 0,0, 2, 0,0, 0,3, 0,0, 0,4, 0,0, 0,5, 0,0, 0,6, 0,0,0 
DATA 7,0,0,0,8,0,0,0,9,0,0,0,10,0,0,0,11,0,0,0,12,0,0,0 
DATA 13,0,0,0,14,0,0,0,13,0,0,0,16,0,0,0,17,0,0,0,18,0,0,0 
DATA 19, 0,0, 0,20, 0,0, 0,21, 0,0, 0,22, 0,0, 0,23, 0,0, 0,24, 0,0,0 
DATA 25 ,0,0,0,26, 0,0, 0,27, 0,0, 0,28, 0,0, 0,23, 0,0, 0,30, 0,0,0 
DATA 31,0,0,0,32,0,0,0,33,0,0,0,34,0,0,0,35,0,0,0,36,0,0,0 
DATA 37,0,0,0,36,0,0,0,39,0,0,0 

DATA 1Cb, 39, 0,0, 38, 0,0, 37, 0,0, 36, 0,0, 35, 0,0, 33, 0,0, 31, 0,0 
DATA 29,0,0,27,0,0,25,0,0,24,0,0,23,0,0,22,0,0,20,0,0 
DATA 18,0,0,16,0,0,13,0,0,14,0,0,13,0,0,12,0,0,10,0,0 
DATA 8,0,0,6,0,0,4,0,0,2,0,0,0,0,0,0,0,0,0,0,0,2,0,0,4,0,0 
DATA 3,0,0,6,0,0,7,0,0,0,0,0,0,0,0,0,0,0,20,0,0,22,0,0 
DATA 23,0,0,24,0,0,23,0,0,0,0,0,0,0,0,0,0,0,35,0,0,36,0,0 
DATA 37,0,0,38,0,0,39,0,0,38,0,0,39,0,0,38,0,0 
DATA 1Mb, 1,0, 2, 0,3, 0,4,0, 3, 0,2, 0,1, 0,2, 0,3, 0,4, 0,5, 0,6,0 
OATA 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 20, 0,21 ,0,22, 0,23, 0,24, 0,25,0 
DATA 26, 27, 2B, 23, 29, 2B, 27, 26 ,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
DATA 30, 0,31, 0,32, 0,0, 0,0, 0,34, 0,0, 0,37, 0,0, 0,0, 0,34, 0,0,0 
.0 

276 DATA 30,0,31,0,32,0,0,0,0,0,34,0,0,0,37,0,0,0,0,0,34,0,0,0 

277 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,10,0,11,0,11,0,11,0,11,0 
279 DATA 15,0,16,0,17,0,0,8,0,19,0,0,19 

279 DATA 1 Cb , 1 8 , , 1 7 , , , 16 , , 15 ,0 , , 14 ,0 , 1 3 ,0 , 12 , , 1 1 , , , 1 
,0 

280 OATA 9,0,8,0,0,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,25,0,24 

.0,0 

281 DATA 

282 DATA 
0,0 

283 OATA 

284 DATA 
283 DATA 
286 DATA 



DATA 

0,0 

i DATA 



31, 0,0, 0,32, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 

0,0,0,0,0,0,0,0,1,2,3,4,3,6,7,8,0,0,0,0,0,0,0,0,0 

12, 13, 12, 13, 12,13, 12,13,0,0 

1Mb, 13,0,12, 0,11, 0,11, 0,0, 0,11, 0,0, 0,0, 0,0, 0,0, 0,0,0 

7,0,0,0,0,0,0,0,0,0,17,0,16,0,23,0,36,0,37,0,38,0,0, 

, ,0 , , , ,0 , , 25 , 26 , 27 , 28 , 28 , 28 , 27 , 26 , 25 , 25 , 24 , 23 , 



DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 



,30,30,30,30,0,0,0, 

230 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,10,3,8,7,6,0,0,0,0,0 

231 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,30,29,28,29,30,31,32, 
31 , 32, 'J i 

232 DATA 33,34,35,36,36,37,20 

733 DATA 1Cb,1 ,2,4,1 ,2,3,0,0,0,3,0,0,0,8,0,0,0,5,0,0,0,2,0,0, 

o,; 

294 DA I A 0,0,0.0, 0,0, 0,0,2s, 26, 23, 22, 27, 29, 0,0, 0,0, 0,0 ,0,0, 0,35 

295 OATA 0,0,0,0,0,0,0,0, 35,36, 33,32, J. ', 33, 0,0, 0,0, 0,0, 0,0, 0,5 

A 0,0, 0,1, 0,0, 0,0, 5, 6, 3, 2, 37, 3, 0,0,0, 0,1, 0,0, 0,0, 5 

,"i? OATA 0,0, 1 ,0,0,0,0,5,6,3,2,37,3,0,0,0,0,1 ,0,0,0,0,5 

:-.iB DATA 0.0,0. > ,0,0,0,0,5,6,3,2,37,3,0,0,0,0,1,0,0,0,0,5 

.'33 DATA 0.0,0.1,0,0,0,0,5,6 



Suite page 8 



FANTOMES 



TI99 BASIC SIMPLE 



J 



r 



Vous etes pauvre mais branche 9 La chasse aux fanto 
mes est une activite a la mode el plutot lucrative, lais 
sez-vous tenter ... 



iase< e^leves a cha- 



2-Achete' hommes el lasers (2 hommes el ' 
que fanlome capture) 

3-Lorsque le plan de la vilte apparail duigez-vous sur la matson aui 
a priqi im cfianoe do couieur e ' appuyez sur FEU 
Marc unloLIN 4-Une maison apparai! Lorsque vous appuyez vol'e homme se 
Mode d emploi translorme en laser, un second appui (ail Mer ie laser 

Pour capturer les fantomes M vous taul 5-Vous relourner en 3 fusqu a ce que vous navez oius d argent 

1-Acheter un vehicuie. son pnx est proportionnel a ce qui vous sera plus de laser ou plus d hommes (vous pouvez en racheter mais 
donne ou retire. attention a laugmentalion des pnni 



>FEi.T€rtT 



5 CALL CHAR<138."7EFF99FFFFFFFF99": 

b FOR X-l TO 29 

7 SCORE < I) -0 

B NEXT X 

10 CALL CHAR 1 34. 

20 PC-3 

21 C-0 
30 SPC-PC 
40 PL -3 
30 5PL-PL 
70 STVI-32 
80 QOSUB 10O 
90 SOTO 5'Xi 

IOO RANDOMIZE 

110 CALL CLEAR 

120 PRINT " 



"7F337F337F3S7F33" i 



ATTENDED UN PEU' 



i DATA 0103O7OF0FIF3F7F 

> CALL CLEAR 

• CALL SCREENITi 

> Ren 

• REM 

I CALL CHAR133.-FFFFFFFFFFFFFFFF-I 
' CALL CHAR (18. "O0O0O1030E0F IF IF" : 
1 CALL CHARt39,-FFFFFF7F7F3F3FIF": 

s.o.s- 

FANTOMES" 



NT 



121 RESTORE 

130 FOR 1-97 TO 113 

140 READ CAR* 

130 CALL CHAR (1, CAR* > 

1*0 NEXT I 

170 DATA OOOOOOOOOOOOO30F.0103O7OFIF3F7F 

FF 

1B0 DATA C0F0F0FCF7F7FFFF.0O00OO00I020F0 

EO 

190 DATA OOO1030707lFlFlP,OFFFFFFFFFFF3F 

IF 

TOO DATA FFFFF1C0E0F0FBFC. 1F1FIF3F3F7F7F 

FF 

210 data ff9f9f9f9f9f9fff.fcfcfcfcfbfbf8 

fb' 

213 data ffffffffffffffff.fcfcfefeffffff 

FF 

220 DATA FOFOFBFFFFFFFFFF.COeOEOFOFOFOFO 

FO 

230 DATA FBFOEOEOEOEOFFFF.EFEFEFDFBFBF7F 



«20 i 
430 I 
440 I 
450 r 
460 I 
470 i 



•bed 



GHOST BUSTERS - 



.L COLOR (4. 16 
COLOR (I. 7. 2) 
FOR |-2 TO 16 
CALL COLORU. 16.21 
NEXT [ 

CALL HCHARd, 1. 138,311 
CALL HCHARI24. 1, 138.311 
CALL VCHARU. 2. 138.241 



afe^ 



£>£=> 



EXELVISION-EXL 100 



Suite de la page 7 



3 00 
301 
302 
303 
304 
309 
106 



3'>3 

310 

311 



31S 
316 

317 

3 1 B 

313 
320 



325 
326 
327 
328 
323 
I 10 



I 13 

3 94 

335 

336 

33 7 

me 
-j 33 

.Mu 

341 
342 

54. t 
34* 

MS 

346 

34 7 
346 

I4S 



353 

354" 
335 
356 
357 



353 X< U1> = 

360 I»U?:GOTD 210 

361 GOTO 36 1 

362 . . 

363 ! PERDU ' 

364 i _ _ , _ i 

365 CALL HROrF:CLS "GEE:" : CALL COl Ok < " 1 YF:' 

366 AF»=ftPT*<"2"X"3"f 



OATA 
DATA 
DATA 
OAT A 
DATA 

DATA 
DATA 
DA rA 
DATA 

DATA 

DAI n 
DA i A 
DA 1 1- 
, IA i R 
DATA 

I lA I R 

DATA 
DATA 

DATA 
DATA 

DAI A 

DATA 

DATA 
DATA 
DATA 
DATA 

DATA 

DATA 

DATA 
DATA 
DA T A 

i IA I 'i 

DATA 
DATA 
DATA 
{-ATA 
DATA 

DA 1 i*i 
DATA 
DATA 
DATA 
DATA 

DATA 

OATA 

DATA 

OATA 
DATA 
DATA 
DATA 
DATA 
DA 1 A 
DATA 
DATA 

DA 1 a 

DATA 

D A I >'■ 



166,0,6,0,7,0,8,0,5,0,3,0,2,0,6,0,9,0,1 ,0,4,0,5,0,9,0,10 

0,0,0,35,35,35,33,35,35,35,1 ,0,1 ,0,2,0,3,0,4,0,1,0,2,0,3,0 

0,0,0,35,35,35,35,35,35,35,1,0,1,0,2,0,3,0,4,0,1,0,2,0,3,0 

0,0,0,33,35,35,35,35,35,35,1,0,1 ,0,20,0,3,0,4,0,3,0,2,0,3,0 

0,0,0,35,35,35,35,35,35,35,1,0,1,0,2,0,3,0,9,0,1,0,2,0,7,0 

0,0,0,35,35,33,35,33,35,33,35,33,35,33,35,35,33,0,0,0,0,0 

25,26,27,25 

1Yb, 1,1, 26, 0,33,0, 23, 0,6, 0,3, 0,4, 0,39, 0,2, 0,0, 2, 0,2 

1,0, 0,1, 26, 0,33, 0,23,0,6,0,3,0, 4, 0,39, 0,2, 0,0, 2, 0,2 

1,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,30, 26, 26, 27, 25, 24 

1,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,30, 26, 28, 27, 25, 24 

1,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0, 30, 26, 28, 27, 25, 24 

1,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0, 30, 26, 28, 27, 25, 24 

1 ,23,24 ,23,22,21 ,26,27 ,23,23 

1Rb,0,0,0,0,19,19j17,18,30,31,23,1,2,1,4,4,1,5,0,0,0,'.0 

0,0,0,0,0,31 ,32, 39,3B,33, 34 ,37,36,35,35,35, 1 , 10, 1 ,20, 1 ,30,39 

1 ,1,3,1,2,9,10, 12, 19, 13,18,1,12,30, 13,39,1,20,34,38,20,21,34,1 

2,3,2,1,2,3,1,2,3,4,9,19,29,2,13,18,3,6,39,2,29,30,5,7,4,3,30 

0,0, 0,0, 0,0, 0,0, 0,0, 0,1, 2, 0,0, 0,0, 4, 0,0, 0,0, 0,0, 0,0, 0,0,0 

1,0, 0,0, 2, 0,0, 0,0, 2,0, 23, 30, 39, 0,0, 12,0, 23, 23, 0,0,0 

, , , , 2 , 29 , 30 

1 Gb , , , 2 , , , O , , , , 23 , 30 , 33 , 3 1 , 23 , 32 , 20 , 34 , 1 9 , 38 , 1 5 

, , , , 2 , , , , , , , 23 , 30 , 39 , 31 , 23 , 32 , 20 , 34 , 1 9 , 36 , 1 3 

0,0, 0,0, 0,0, 0,0, 1,0, 0,1, 2, 0,0, 0,0, 4, 0,0, 0,0, 0,0, 0,0, 0,0,0 

0,0,0,0,2,0,0,0,0,0,0,23,30,39,31 ,23,32,20,34,19,38,15 

, , , , 2 , j , , , , , 23 , 30 , 33 , 3 1 , 23 , 32 , 20 , 34 , 1 9 , 38 , 1 5 

3,3,2,3,2,7,5,8,9,1,4,23,30,33,31,13,12,10,34,3,38,5 

3 , 3 , 2 , 3 , 2 , 7 , 5 , 8 , 9 . 1 , 4 , 23 , 28 , 23 , 20 , 9 , 2 , 30 , 36 

1 Cb , 2 , 3 , 2 , 7 , 5 , F) , 9 , 1 , 4 , 23 , 28 , 23 , 20 , 9 , 2 , 30 , 36 , 39 , 20 , 1 , 2 , 3 , 20 , 21 
2,3,2,7,5,8,3,1,4 23,28,29,20,9,2,30,36,39,20,1,2,3,20,21 
2,3,2,7,5,8,3,1 ,4 , -j, .'8 23 20,3,2,30,36,33,20,1,2,3,20,21 

2 , 3 , 2 , 7 , 5 , 8 , 9 , 1 , 4 , 29 , 2B , 29 , 20 , 9 , 2 , 30 , 36 , 39 , 20 , 1 , . 

0,3, 0,7, 0,8, 0,1, 0,23, 8, 19, 23, 9, 0,30, 16, 31, 0,0, 2,0, 20, 11 

0,0, 0,7, 0,0, 0,1, 0,13, 8, 19, 22, 9, 0,10, 16, 31, 0,0,0. 0,20, 11, 1,1,1 

0,0,0,37,0,0,0,0,0 

int. ,0, 37, 0,0, 0,11,0, 19, 18, 13, 22, 9, 0,0, 16, 3, 0,0, 0,0, 0,1, 1,0,1 

0,0,0, 37 ,0,0, 0,11,0, 19, 18, 13, 22 ,3, 0,0, 16, 3, 0,0, 0,0, 0,1, 1,0,1 

8, 3, 0,3, 0,0, 0,11,0, 13, 1,0, 22, 9, 0,0, 16,3, 0,0, 0,0, 0,1, 1,0,1 

8, 9, 0,3, 0,0, 0,11, 0,19,1, 0,22, 3, 0,0, 16, 3, 0,0, 0,0, 0,1 ,1 ,0,1 

8,3,0,3,0,0,0,11,0, 19, 1,0, 22, 3, 0,0, 16, 3, 0,0, 9, 10,20,30,31 

0,0, 0,3, 0,0, 0,31, 0,19, 1,0, 22, 3, 0,0, 16, 3, 0,0, 3, 10, 20, 30, 31 

1Yb, 3, 3, 4, 6, 5, 31, 5, 19, 1,5, 22, 3, 8, 7, 6, 3, 5, 6, 5, 10, 2, 5, 4, 3 

3, 3, 4, 6, 5,31,5, 13, 1,5, 22, 3, 8, 7, 6, 3, 5, 6, 5,10, 2, 5, 4, 3 

0,3,0, 6, 0,31, 0,19, 1,0, 22, 0,8, 0,6, 0,5, 0,5, 10, 2, 0,4,0 

0,3, 3, 6, 9, 31, 0,13,3, 0,29, 0,8, 0,6, 0,9, 0,5, 13, 2, 0,3,0 

0,0, 9, 0,0, 31, 0,3, 3, 0,2, 0,0, 0,0, 0,0, 0,5, 3, 0,0, 0,0 

0,0, 3, 0,0, 31, 0,3, 3, 0,2, 0,0, 0,0, 0,0, 0,5, 9, 0,0, 0,0 

0,0, 0,0,0, 1,0,0, 0,0, 1,0 

1Mb. 0,0, 0,1, 0,3, 0,0, 2, 0,0, 0,0, 0,0, 0,0, 9, 0,0, 0,0, 0,0, 15 

O.oio, 20, 21, 22, 0,0, 0,0, 10, 3, 8, 7, 0,0, 0,0, 0,0, 0,30, 31 

0,0,0,20,0,22,0,0,0,0, 10,3,8,7,0,0,0,0,0,0,0, 30,31 

33,0,0,0,0,0, 10, 10,10,0, 10,0,33,33,0,0,0,0,0,0,10 

11, 0,0, 10, 0,0, 1,0, 10, 0,0, 0,0, 20, 21, 22, 10, 20, 12, 0,0, 13 

0,0, 0,20, 21, 22, 0,0, 0,0. 10, 9, B, 7, 0,0, 0,0, 0,0,0, 30, 31 

0,0,0, 20, 21, 22, 0,0, 0,0. 0,0, 0,0, 1,2, 3, 4, 5 

FIN 



Q_ 



C'E$T USE V/£iCW 




S*7 

560 
370 



(,:<:■ 
630 

640 

ISO 
660 

670 

6B0 
690 

700 

790 
900 

■10 

070 

■30 
■40 

090 
BM 
■70 
BOO 
■90 
qoo 



CALL VCHARU. 31. 138.24) 

FOR 6-1 TO 4 

FOR 1-1 TO 10 

CALL COL0R(l4.4.2l 

CALL CQL0RC14.3.2) 

CALL SOUNDU. 1-tllOofi. !*•) 

CALL C0LDR(14.7.2) 

CALL SOUND' I. I-IOOO/S. I*G> 

CALL COL0R(14. 13,21 

CALL C0L0RI14. 16. 2> 

NEXT I 

NEXT 8 

CALL CLEAR 

PRINT " VEUT TU LES REGLES'ii: i i: 

INPUT IXC* 

IF ZXC4-"OUI" THEN 20000 

CALL CLEAR 

PRINT - AG TU DE L ' ARGENT" ri ! I I i 

INPUT R« 

HSOUS-IOOO 

IF R4--N0N- THEN 790 

CALL CLEAR 

PRINT 

PRINT - TU ME VEXE - 

GOTO 690 

PRINT "LA &ANDUE TE PRETE 10OO4" 

PRINT II 



PRINT i 

PRINT ' 

PRINT 

PRINT ' 

PRINT 

PRINT ' 

PRINT ii II 

INPUT NO 

ON NO GOTO 970.930.930 

SOUS- 100 



1-UN VELO- IOO*" 
2-UNE NOT0->4006" 



3-UNE V0ITURE->900»" 



940 GOTO 9B0 
950 SOUS-SOO 
960 GOTO 980 
970 sous-aoo 

980 CALL CLEAR 

990 PRINT ||»" TU A5 " t SOUS t M • " 

10O0 PRINT lit- COMB I EN VEUT TU D 
- *20»" 

1010 INPUT HO 

1020 SOUS-SOUS- tM0«2Ol 

1030 PRINT i:iii" TU AS " I SOUS t M • * 

104O PRINT ltd- COMB 1 EN DE LAZES-;; 

1 CiSO INPUT LA 

1O60 SOUS-SOUS- >LA« 101 

1070 CALL CLEAR 

1000 CALL SCREEN'21 

1090 CALL CHARU22.-7F537FS37F337FS3 1 

1091 POI-32 

1100 CALL COL0RI12.7. 161 

1101 C-C*i 

1 102 SCORE (CI -SOUS 

lllO IF SOUS 10 THEN lOOOO. 
1120 PRINT " kkkkkkkkkkkl 
1130 PRINT - fc 
1140 PRINT - k i i 
I ISO PRINT " » 
1160 PRINT - V 

L 170 PRINT " k * i 

1180 PRINT - k 
I 190 PRINT - L 
I2O0 PRINT "kit 

1210 PRINT - l 

1220 PRINT " utiuH 

1221 LKJ-LKJ-7 

1230 PRINT ii" TU AS -. IS0U6 
1240 PRINT it- TU TE OIRIBE i 
E LA HANETTE NO. I" 



L'AIDE D 
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I U 



367 

jee 

163 

I/O 

371 

372 

:?73 
574 
373 
376 

177 

176 

3 73 
-JHO 

361 

3H2 
TB3 
384 
385 

3W 

307 

mo 

3B3 
330 
331 
332 
363 
194 
315 
396 
397 
386 
339 

JOG 
401 



LOCATE (IjZ)iPRINT AF» 

LOCATE (20,2>:PRINT AF« 

FOR 1=2 TO 20 STEP 2 

LOCATE (I,1);PRINT "0":NEXT 

FOR 1-1 TO 20 STEP 2;L0CATE <I,1):PRINT "N"tMCXT 

FOR 1-2 TO 20 STEP 2 

LOCATE <I,40>:PRINT "0":NEXT 

FOR 1=1 TO 20 STEP 2 

LOCATE <I,40)iPRINT "N"iNE9(T 

CALL COLOR <*'1Ge") 1 LOCATE <3,14> 

PRINT "op st yi 67 |(" 

LOCATE (4,14) 

PRINT "qr uv yr 89 <-" 

CALL COLOR("lrie"> tFOR 1-1 TO NBR 

LOCATE (6»I,3)lPRINT "cd" 

LOCATE 16*1*1, 3):PRINT "4>f B h i h j ":NEXT 

LOCATE (7,16)iPRINT "kl )"|;CALL COL0R( "One") :PRINT S(1) 

CALL C0L0R("1Ne"> 

IF N6R-2 THEN LOCATE ( 13, 16) : PRINT "■n )";:CALL COL0R( "0M6" ) :l 

1DATAS DE LA HUSIOUE OE FIN 

RESTORE 392 

CALL P0KE<50688, 165,8,6, 10) 

CALL P0KE(49156, 198,0) 

DATA 130, .8, 158, . 8 , 158, . 2 , 156 , . 8 , 209, . B, 168 , . 7 , 166 , . 2 , 1 68 , . 8 

OATA 198, .8, 156,. 8, 158, .2,158, .8,203, .8, 168, .7, 168, .2, 168, . 8 

FOR 1-1 TO 16:REA0 SS,PP 

CALL P0KE(256,SS,160> 

CALL P0KE(238,SS,147) 

CALL P0KE(238,SS,131) : PAUSE PP 

CALL P0KE(259,45):NEXT 

<UNE AUTRE PARTIE 

CALL COLORCObe" ) 

LOCATE (13, 3> 

PRINT "UOULEZ-VOUS REJOUER 7 (1 , 

PAR*=KEY* 

"THEN RESTORE : GO 10 14: 

-THEN 412 




IF PAR»^ 
IF PAR« = "< 
GOTO 405 



410 
4 1 1 

412 

.1 .1 

1 14 
4 15 
4 1F, 



FOR 1-2 TO 33 
FOR J-2 TO 19 
LOCATE (J,I):PRINT 
NEXT 



NEXT 

DIM FIt<19> 

FI4<3)=" NOUS ESPERONS DUE L'ATLANT-EAT VOUS 

FI*(6)=" DISTRAIT POUR QUELOUES INSTANTS A L 

FI*(3)-" PROCHAINE FOIS AVEC ATLANT-EATii 

FOR 1-1 TO 9 

FOR J-2 TO LEN(FI«CD) 

CALL COLORC'ORR") 

LOCATE (1.1 , J):PRINT » " 

CALL C0l.OR("OMB") 

LOCATE <I.1,J) 

PRINT SEC»(FI*(l) ,J,1) 

CALL P0KE(258,152,147) 

NEXT 

CALL F'0KE(259,45) 






% 



V 



i£? 



/ Oi , nr-c£ (ju'il Mir !. 
U (X 8? ME S£I*<'S-7FJ 



<^S* 



\>\ 



C'est nouveau, $a vient de sortir 



BIDOUILLE GRENOUILLE 



Voict la solution du grand jeu 
d aventure "BidouiHe grenouille" 
Tout d'abord. lorsque le garde 
vous demande la solution du 
Sceptre d'Anubis sur One, pro- 
noncez les noms de Gaby Lous- 
tic et de Stephane Sarlande, 
puis tapez ; 

"O. prends lampe. e. n, prends 
boite. allume allumette (si elle 
casse, recommencer), allume 
lampe, pose torche. pose fusil, 
pose decrypteur, n, prends 
epee. s. s. e. monte escalier. 
tranche toile, pose epee. pose 
boite. prends clet, descends es- 
calier, o, o, o. n, appuie soleil. n, 
n, prends bottes, enfile bottes, s, 
o. ouvre cottre, prends vert. s. 
vide sac, prends sac, n, e. s. e, 
prends corde. s. e, n, pose 
corde. prends decrypteur, e, n, 
decrypie hieroglyphes (retenir la 
couleur), s. o, pose decrypteur, 
pose bottes, prends corde, n. 
descends escalier. attache 
corde. franchit fosse, n. n. offre 
vert, n, ouvre (la couleur indi- 
quee par les hieroglyphes). 
prends sceptre, grimpe escalier, 
appuie oeil. n. s." 
Une fois cela fait, allez a gauche 
apres le tournant. tout en evitant 
les fiaques d'acide sulfurique qui 
parsement le chemin. Allez de- 
vant I'Oric geant qui barre le 
chemin, prosternez-vous devant 
lui et donnez-lui la solution de 
Jean-Marc Lombardo pour Ter- 
minus : 

"Prends epingle. m. n. insere 
epingle. n, m, m, pose laisser- 
passer, d, d, o. prends balle. 
casse balle. prends cle, pose 
balle, o prends lampe. e, n. d. 
n, prends pile, branche pile, m, 
o, o, allume lampe, prends mas- 
que, e. prends grenade, e. 
etemdre lampe. d. mettre mas- 
que, e, d. allume lampe, prends 
peche, mettre crampons, m. o. 
degoupille grenade, o. lance 
grenade, d. o, s. e, s, o, prends 
recipient, mange peche. o, n. 
remplis recipient, s, e, e. m. e. 
prends rouleau, eteins lampe. o, 
s. e. m. m. insere cle. huile 
porte. ouvre porte. pose reci- 
pient, prends carte, prends lais- 
ser-passer. d. prendre tole. d. 0. 
n, d, d, allume lampe, prends 



poignee. m. n. e. prends fer. d, 
n, branche fer, soude micro, re- 
pare machine, insere carte. 
compose 0548, n. n, mettre poi- 
gnee. ouvre fenetre. prendre 
dossier, d, donner la isser- pas- 
ser " 

Puis lire les dossiers pour de- 
couvhr les plans ultra-secrets du 
til a couper le beurre electroni- 
que. 

One fois arrive devant la ca- 
verne maudite et mfernale. ap- 
puyez sur I'oeil de la statue du 
grand sorcier. A ce moment-la. 
une trappe va pivoter et donner 
acces a un souterrain sombre et 
humide II faut vous glisser dans 
ce passage sans hesiter. Lors- 
que vous etes plonge jusqu'au 
cou dans la vase et le limon, 
dites "Au secours !" et vous 
vous trouverez transport* par 
une faille du continuum spatio- 
lemporel. Vous atterrtssez dans 
un immense lac rempli de vase 



pilote vous demande comment 
sortir de la premiere image de 
Jewels Of Babylon, repondez 
"Climb down ladder, row north, 
get out of boat, go east, take 
plank, go west, up." 
Oites-lui ensuite de ramasser la 
bouteille. de trouver deux chaus- 
sures sinon on boite. de donner 
la montre aux cannibales et de- 
mandez-lui de lancer un appel 
radio pour avoir la solution 
complete II vous donne alors un 
morceau de papier ou est Ins- 
ert! ; 

Pour effectuer des copies anti- 
cafe sur Spectrum, il suffit, 
comme le fait Alain Camerano, 
de brancher un magnetophone 
contenant le programme a co- 
pier sur la prise "Ear", un autre 
contenant une cassette vierge 
sur la prise "Mic" et de faire 
LOAD'". 

Puis il vous iargue au-dessus 
dune lore! amazonienne sans 




et de limon, Prenez une forte 
inspiration et bouchez-vous le 
nez : vous n allez pas larder a 
eire prls dans un lourbillon qui 
vous entralne irremediablemenl 
vers le fond du lac. Vous etes 
aspire par un conduit etroit. bien 
entendu pleln de vase et de 
limon. 

Un detail tres important : il faut 
gratter les parois du conduit afin 
de recueillir le maximum de 
vase et de timon sous vos 
ongles, cela sera utile par la 
suite. Au bout dun moment, 
vous emergez a lair libre Aussi- 
tot, un helicoptere fonce sur 
vous avec sa sirene hurlante et 
vous lance une corde que vous 
devez attraper. Hissez-vous jus- 
qu'a la cabine, et la, lorsque le 



parachute. Heureusement. votre 
chute est tout de meme paree 
par un arbre, vous ne vous cas- 
sez que deux c6tes. Vous vous 
mettez a tamper, au passage 
notez bien les inscriptions maya 
que vous voyez sur les roches 
autour de vous, elles servlront : 
"Pokes pour Spectrum. Tutunk- 
hamun, POKE 27279,x (x< 0< 
11) pour acceder aux nouveaux 
ecrans, POKE 27883,0 pour un 
nombre de vies infini. Horace 
and the spiders. POKE 
27680.0 : POKE 24960.0 pour 
nombre de vies infini. Kosmic 
Kanga: POKE 23994.x pour x 
vies (0-255), POKE 3621 2,0 
pour vies infinies et POKE 
35136.x pour x hauteur dans le 
saut. Jet Pac ; POKE 25015,62 : 



POKE 25016,5 POKE 

25017.0; POKE 25018.0 pour 
nombre de vies infini. Cookie. 
POKE 28695.62 POKE 

28696.5 : POKE 28697,0 
POKE 28698.0 Frank N Stein 
POKE 34124.0 si votre version 
a un SCREENS ou POKE 
28277,0 : POKE 28278,0 si il rVy 
en a pas Ah Diddums : POKE 
24942.250 pour 250 vies. De- 
fenda : POKE 37531.0 pour 
nombre de vies infini, POKE 
34163,0 pour nombre de 
bombes infini. Moon Alert, 
POKE 39754.0 pour nombre de 
vies infini, POKE 42654.195 
pour une invincibilite absolue. 
Buck the Crackman aime Polo " 
En rampant vers louesl, vous 
arrlverez au bout dun moment a 
un temple maya. Entrez. allez 
directement a la cryple Prenez 
le pieu. faites bouger la bougie 
sur son candelabra, ce qui fait 
pivoter la bibliotheque. Entrez 
par le passage ainsi libere. 
avancez jusqu'au cercueil et en- 
foncez le pieu dans le coeur du 
vampire. Aussitdt. un eclair jaillit 
et vous vous retrouvez sur la 
planete Mars. Allez au nord 
(deux fois). prenez la cle, ouest. 
ouvrez I'armoire avec la cle. pre- 
nez la boite. poussez le bouton 
et un second eclair jaillit. Vous 
vous retrouvez sur cette bonne 
vieille terre. devant un minitel 
Appuyez sur le bouton, appelez 
le 613 91 55 et composez les 
codes suivants : 

175040978, puis 

50101645.DHE, 169001672P. 
commandez un catalogue. 
159000645 puis JEUX (Mots 
croises et arche de Noe), 
191040421, ICE, CT33 puis 
MUL puis choix 6 (savoir si vous 
devez appeler le Samu apres 
des libations). 

Tentez ensuite de contacter le 
couillon qui m'a envoye ca sans 
ses coordonnees. Puis eteignez 
le minitel. allez au sud (deux 
fois), ouvrez le coffre, prenez le 
journal, il y a un grand eclair 
usez le tltre : Hebdogiciel. 
Apres, debrouillez-vous, je vous 
ai assez mache le travail 
comme ca. 



THOMSON : 

L'ORDINATEUR 

INVISIBLE 




Suite de la page 
separes et une louche 
Entree jaune, une unite 
centrale comprenant deux lec- 
teurs de disquettes 5 pouces 
un quart (legerement plus pe- 
tite qu un attache-case) et un 
moniteur couleur assez en- 
combrant. 
La. nous avons 
droit a un speech 
sur les buts de 

Thomson. sur 

louverture vers 

l etranger et su' , 

les objectifs 

attaints (ils om 

decide de lane 

un ordinateur 

en Septembre 

1979 Les cen' 

premieres ma 

chines etatent 

presentees 

en Septembre MOS * vmc 

1982. quelle rapidite I). 

Malgre les pieges subtils que 

nous tendons ("-c'est pas un 

peu dommage d equiper cette 

machine dun 6809 7 -Je nai 

pas dit qu ii etatt equipe dun 

6809 -C'est un 16 bits, alors "> 

-Je n'ai pas dit ca non plus."). 

aucune information ne nous 

sera donnee en pature Mais 

I ombre du 6809 plane tout de 

meme dans la salle nous 

n'avons pas besom dun 16 



bits pour adresser plus de 64 
Ko." Voudrait-ce dire qu'ils 
adressent 128 Ko avec un 8 
bits, done que la machine 
comporte un 8 bits, done puis- 
que elle est compatible avec le 
T07 et le M05 quelle est 
equipee d un 6809 ■> 




QDV»t0x tension 
Mmmmmhhh ? Voudrait-ce 7 
Vous suivez mon raisonne- 
ment. mmmmhhh ? 
Sur un plan radicalement diffe- 
rent, Thomson commercialise 
au mois de Septembre (ca 
coincide avec la rentree ben 
tiens) un Quick Disk Drive 
classique -2 pouces 8 50 Ko 
par face-au prix de 1500 baiies 
pour M05 el 2200 pour T07 
(avec extension memce in- 
cluse) ■ 



COMMODORE : 

LET'S JETER UN COUP D'CEIL 

AT THE FRANCE 



Suite de la page 1 
produit grand public) ne du- 
rera que jusqu'a la tin de i an- 
nee. 

II est tout de meme etrange 
que les problemes qui atfec- 
lent la filiate britannique n'aient 
pas empeche Commodore de 
venir simplanter en France. 
Quelques infos techniques 
bien juteuses comme il faut : le 
PC 10, pour 18.000 belles, 
propose un 8088 (processeur 
16 bits tournant a 4.77 Mhz et 
un co-processeur anthmetique 
8087, une Bam de 256 Ko. 
une Rom de 8 Ko. le MS-DOS 
d'IBM. le Basic A d'IBM. des 
connecteurs IBM, 2 lecteurs de 
disquettes 5 1/4 pouces. une 
interlace paralieie une serie et 
un moniteur monochrome 
Le PC 20 vaut 11 000 francs 
de plus, possede un disque 
dur de 10 Mo en plus, un lee- 
teur de disquettes en moins et 
pas de 8087 (sauf en option) 
Assez pour le pro, voyons 
r amateur, avec le Plus 4 : un 
processeur 7501 de Commo- 
dore (compatible 6502. quand 
meme). 64 Ko de Ram. 32 Ko 
de Rom, quatre programmes 
integres (d'ou le nom) et tout 



gems de connecteurs compar- 
es avec rien du tout sinon 
avec le standard Commodore, 
qui n en est pas un. Meme la 
RS 232 a une tele bizarre. Prix 
prevu avant le Sicob : 3150 
francs. Prix pendant: 1990 
francs, en Pal, rajoulez le prix 
de i interlace Secam. Attendez 
la termeture. ca peut encore 
baisser 




Le C16 ne sera pas vendu en 
. ranee, et c est tanl mieux. 
Pendant ce temps-la, le 
CBM64 vaut toujours 2790 
baiies. 800 de plus que le Plus 
4 C'est rationnel. vous 
croyez 7 ■ 



LES POMMES NOUS PRENNENT 
POUR DES POIRES 



Suite de la page 1 
Alors que tous les construc- 
tors se sont donne le mot 
pour presenter leurs nouveau- 
tes au Sicob. Apple n a surtout 
pas envisage de reveler le 
momdre soupcon de debut de 
commencement de revolution 
dans sa gamme de produits. 
Que nous reste-t-il a nous met- 
tre sous la dent ? Tout d'abord 
le nouveau bloc alimentation 
du c qui dispose maintenant 
d'un interrupteur et de deux 
diodes, une verte une rouge. 
Un autre aspect du stand 
Apple : la Boutique Apple, ou 
comment donner de I'argent 
pour faire de la pub a ces 
gens. Du T-shirt au sac de 
voyage en passant par le jog- 
ging et le parapluie. vous de- 
bourserez de 50 a 400 baiies 
pour exhiber la pomme multi- 
colore de votre marque prefe- 
ree Si avec ca vous n'avez 
pas ['impression de combler 

les trous de caisse d'Apple. 
c'est que deja vous etes 
accros 

Si les applelistes se refusaient 
a toute declaration concernant 
les produits tuturs. il parait cer- 
tain que la maison-mere a de- 
cide de mettre la pedale douce 
en ce qui concerne le Macin- 
tosh (la fabrication du XL est 
definitivement abandonnee), et 
de s'interesser a nouveau a 
son micro prodigue le fVe. 
Deux nouveautes remarqua- 
bles, pour celui-ci, sembient a 
peu pres certaines de voir le 
jour : une carte d'extension 
memoire de 256 Ko qui est 
deja prete et quand je dis 256 
Ko c'est pas 8 fois 32 Ko, 2 
fois 128 Ko ou 4 fois 64 Ko 
mais 256 Ko adressables di- 
rectement. en Main Memory 
quoi ! Mais ce nest pas tout 
pour cette nouveaute : cette 
carte sera extensible jusqu'a 
1.024 Ko, en quatre pages de 
256 Ko. Vous voyez un peu 
1'ambiance de votre vieux //e 
tout pourri avec 1 Mega ? 
Deja je sens que vous avez 
I'eau a la bouche. que vous re- 



grettez d avoir achete un Mac 
plutot qu'un e. Alors prepa- 
rez-vous a revendre le Mac 
Apple va proposer un lecteur 
de disquettes au standard 
Sony (c'est a dire 3 pouces et 
demi) dune capacite de 600 
Ko formate Ne nez pas ! Vous 
naurez que le drive a acheter 
puisqu'il se laisse conduire par 
le controleur que vous avez 
actuellement dans le slot 6 de 
votre becane. Seul inconve- 
nient . il ne fonctionne pour le 
moment que sous Prodos, 
mais les p tits gars de chez 
Apple nous concoctent la ver- 
sion Dos 3.3 pour tres bientot. 
Une absence remarquee sur le 
stand ; le kit c du e n'etait 
pas presents Alors est-ce un 
oubli ou le kit n'est-il pret que 
dans les declarations des res- 
ponsables de chez Apple ? La 
suite au prochain salon.., 




Dans la categone des rumeurs 
non confirmees, nous avons 
deux objets a vous proposer : 
un Mac en couleur qui fonc- 
tionnerait deja dans le bureau 
de Steve Jobs, malheureuse- 
ment pas question de le sortir 
tant que les quelques dizaines 
de milliers de Mac en stock ne 
seront pas vendus a de braves 
gogos prets a raquer plus de 
25.000 francs pour cette ma- 
chine re volution nai re mais de- 
passee. D autre part nous 
aurons Dienlnt en rnyon un 
nouvel Apple tl (x, alpha ou 
omega 9J couple au nouveau 
drive 3.5 pouces et compatible 
a 50% avec les micros de la 
serie - Mais ce ne sont que 
des rumeurs. alors patience '■ 



ATARI, JACK A 
UN NOUVEAU COPAIN 



Suite de la page 1 
gammes perimees, le killer de 
technologic poussive. il nargue 
les detracteurs et les optlmis- 
tes qui pensaient que Tramiel 
etait f;ni et qu'ils pourraient 
continuer a vendre cher la 
37eme version de leur ba- 
basse quinquagenaire. II est 
bien la avec son ecran cou- 
leur, son Gem integre. sa me- 
moire d'enfer et sa belle 
gueule. La chaleur et le sand- 
wich horrible que j'ai Ingurgite 
deux heures plus tot m'empe- 
chent de reflechir mais pas au 
point de ne pas me demander 
ce que je tous la. Pourquoi 
suis-je en train d'admirer le 
nouvel Atari sur le stand dun 
fabricant de kxjiaei au lieu de 
(aire la meme chose sur le 
stand Atari ? Pourquoi ? Ben, 
parce que le stand Atari, y en 
a pas I Atari France n'ayant 
pour i instant pas grand chose 
a vendre n'a pas |uge bon de 
venir nous montrer les joyaux 
de sa nouvelle collection. Ils 
ne voulaient d'ailleurs meme 
pas montrer les deux machi- 
nes qu'ils qardaient dans un 
Clacard en France. 
eo Britain, un des dirigeants 
de Micro-Application, avait fait 
ami-ami avec Tramiel lors de 



son passage a Hanovre. Prol- 
iant de cette relation pour le 
moins mieressante. il a tele- 
phone a son ami Jack pour 
pouvoir le montrer sur son 
stand et miracle : Jack a dit 
oui. Du coup tout le monde est 
content : Micro Application re- 
cupere un 520 ST pour deve- 
lopper des programmes et se 
fait sa petite pubiicite, Jack fait 
plaisir a son nouveau petit co- 
pain, Atari France montre sa 
machine sur le Sicob sans de- 
bourser un rond et les Irartcais 
peuvent commencer a baver ! 




deuxieme machine, ou 
keiie est ? Ben. c'est Millant, 
I'ancien cald d Atari d'avant 
Tramiel qui la recupere pour 
son stand Galaxie que c'est un 
scandale d'avoir un stand si 
petit quand on veut devenir le 
premier grossiste de France et 
de Navarre 

Putain d aeration, qu est-ce 
qu'il pouvait faire chaud. ■ 



LASER ECRABOUILLE LES PRIX 



Suite de la page 1 

d'etre compatible MSX, ca vaul 
le coup 1 

Un 2 80 a 3.7 Mhz anime le 
LASER 500 Le clavier meca- 
nique a 74 touches comporte 
74 touches donl 8 touches de 



fonction, 8 touches oe gesnon 
de curseur et 4 touches de 
geslion d'ecran, L'aftichage se 
fait en 40 ou 80 colonnes en 
maiuscules. minuscules ou ca- 
racteres semi-graphiques. 16 
couleurs sont disponibles amsi 
que 5 resolutions graphiques : 
160 x 96 pixels jusqu'a 640 x 



192 

La zizique ? une vote sur six 
octaves Interface 7 Centro- 
nics, disquette et cassette inte- 
grees RS 232. joystick, crayon 
optique. convertisseur analogi- 
que digital el digital analogique 
en option Le systeme d'exploi- 
tation des disquettes esl un 



CP M 2.2 compatible avec le 
formatage du CP M d Apple. II 
faudra artendre le Sicob de 
Septembre pour connaitre les 
caraclerisliques definitives. En 
attendant, les prix annonces 
officiellemenl adoptent une pht- 
losophie ideale : ca baisse 



C'est nouveau, $a vient de sortir 



FUTURSYS : 

LA MACHINE DE L'^LITE 

ESTAVANCEE 



Eiie est francaise, elle tient 
dans la majonte des attache- 
cases standards, elle fonc- 
tionne sur piles ou secteur. elle 
tourne sur un 65C02 (comme 
r Apple c). elle dispose de 48 
Ko utilisateur (mieux qu un 
Oric ou qu'un Commodore), 
elle vaut moins de 4500 francs 
(pas cher). elle necessite une 
licence dinformatique ou de 
maths pour etre programmee 

Comme d habitude lidee est 
trancaise a son ongine reste a 
savoir si elle le restera. Tou 
lours est-il que le premier 
micro-ordinateur (relativementl 
grand public base sur les prm- 
cipes de programmation de 
Intelligence Artificielle (I. A 
pour les cables) existe, et il se 
nomme Futursys Technique 
ment, rien de (emblement no- 
vateur dans cet engin : un 
ecran a cristaux liquides de 
deux lignes de 40 caracteres. 
un 6SC02 a 2 MHz. une Ram 
de base de 8 Ko extensible 
par increment de 8 Ko jusqu'a 
48 Ko (sans augmenter pour 
autant la tattle de la machine), 
une interface cassette pour la 
sauvegarde des programmes, 
un clavier digital de 48 touches 
multi-fonctions, deux ports 
d'entree sorties pour le bran- 
cnement de peripheriques non 
encore developpes. moins d'un 
kilogramme (batteries inctu- 
ses). un mode d'emploi plus 
lourd que la machine (mats 
complet !). 

II ne ressemble a aucun ordi- 
nateur connu et il tonctionne 
comme aucun ordinateur 
connu : pas de Basic, ni de 
Logo, encore moins d assem- 
bler ou de Forth. En (ait. ne 
cherchez pas, il n'offre aucun 
des langages de programma- 
tion connus : ce micro nest 
pas destine aux bncoleurs de 
Pac-Man du dimanche. Un Ian- 
gage et un seul : Futurlog 
Avec un nom pared, ca ne 
peut pas etre simple, allez- 
vous me dire. Perdu f Ce Ian- 
gage comporte en tout et pour 
tout., quatre instructions (ap- 
pelees Mela caracteres par 
leurs createurs) ' Mais ces 
quatre instructions vous don- 



nent la possibility de creer 
votre propre jeu destructions 
(actueilement 256 au maxi- 
mum). Futurlog repond en fait 
a deux imperatifs de base 
supprimer la syntaxe ngide des 
langages de programmation 
actuals en vous permettant 
d installer dans la machine 
votre propre syntaxe et donner 
lopportunite du calcul parame- 
tre (calculs algorithmiques et 
recherches multiples propres a 




La programmation de la bete 
se passe en deux temps pre- 
paration d'un ensemble or- 
donne depressions (structu- 
res) pour I'analyse de celles-ci 
et preparation dun ensemble 
ordonne d'expressions deja 
analysees (faits) pretes a etre 
digerees par calcul Un 
concept se decompose en un 
ensemble de structures et de 
faits. La ou Futursys devient 
vraiment tres impressionant, 
c'est que differenls concepts 
peuvent etre implantes simuita- 
nement en memoire. coexister 
et communiquer. Conclusion : 
avec un minimum de rigueur 
mathematique et en reniant 
toutes vos connaissances en 
programmation classique, vous 
vous retrouvez a la tete dune 
machine qui vous ouvre des 
voies jusqu'ici inexplorees, non 
par ignorance mais par impos- 
sibilite d'acces Vous pouvez, 
grace a ce micro, creer votre 
systeme expert personnel, tout 
comme vous pouvez resoudre 
des problemes de theorie des 
langages ou d analyse chimi- 
que par la manipulation dun 
vocabulaire quotidien. Fabu- 
leux. mats inaccessible & qui 
n'a pas la tournure d'espnl ne- 
cessaire a la programmation 

d ....,.•■ 

compte loutil ideal de l etu- 
diant en sciences de deuxieme 
ou troisieme cycle 



J'AI LANSAY 
LA PREMIERE PIERRE 



Le Lansay 64. plus connu sous 
le nom de Enterprise 64, plus 
connu sous le nom de Flan 64, 
plus connu sous le nom de 
Elan 64 baisse de prix. II 
passe de 5000 balles (en fait. 
4990) a 3000 (en fait. 2990) 
Cela signifie qui! vaut desor- 
mais mois cher (de 2000 
balles tres exactement) et que 
Lansay doit avoir de serieux 
problemes. A moins que ce ne 
soil les soldes de pnntemps ? 




AMSTRAD: 
EN VENTE PARTOUT 



Bien sur. Amstrad etait au 
Sicob ' Et avec son CPC 664, 
comme il se doit, ll etait temps 
de Cannoneer il est deja dans 



les magasms La difference 
avec leur stand a Micro-Expo 7 
Leurs placards regorgeaient de 
softs, de revues, de bouqums, 



tous consacres a cette ma- 
chine pourtant recente. Une 
foison d editeurs et de diffu- 
seurs se son! jetes sur le cre- 
neau et proposent des ouvra- 
ges techniques, des cassettes, 
des disquettes a ne plus savoir 
qu'en faire 

Ceux qui ont reussi a toucher 
le 664 ont bien de la chance : 
la foule se pressait en perma- 
nence pour le voir, le toucher. 
verifier que PRINT FRE (0) 
donnait bien 42 Ko utilisateur. 
Vous ngolez. ou quoi ? Deja 
qu'ils annoncent la machine 
une semaine avant la sortie en 
boutiques, ils ne vont pas an- 
noncer des chiffres faux ' 



GASSEE AG ACE 



"-Bonjour. (serrage de mams) 
je suis journaliste a Hebdogi- 
ciel (desserrage de mams) 
-Oui? 

-Je viens vous voir entre 
autres pour que vous me di- 
siez si les bruits qui courent 
sur votre demission sont 
fondes 

-C'est encore une des conne- 
ries que vous imprimez dans 
votre torche-balle 
■Mais non. |ustement je viens 
vous voir pour avoir une confir- 
mation. 

-Oui. je vous dis dans le genre 
de ce que vous imprimez dans 
votre torche-balle. 
-Ecoutez. si vous nous donniez 
plus d'informations 
-Ecoutez. j'en ai marre de 
vous, de . votre torche-balle 
Alors. imprimez-le Allez-y. im- 
primez-le. c'est ires bien. 
-Vous etes un peu agressif. la. 
non ? 

-Ecoutez, si j'etais aussi agres- 
sif que vous. je vous aurais 
deja mis mon poing dans la 
gueule. Allez. disparaissez. je 
veux plus vous voir." 
(il disparail a linteneur du 
stand.) 

C'est la retranscription inte- 
grate de i interview que j'ai rea- 
hsee pour vous de Jean-Louis 
Gassee, President Oirecteur 
General d'Apple France sur 
son stand au Sicob. 
Malgre le peu d'informations 
qui ressortent de ce dialogue. 
on peut tout meme en tirer un 
grand nombre de conclusions. 
Monsieur Gassee est Iras poll 
Au lieu de dire "torche-cur 
comme vous et moi, il dit "tor- 
che-balle" Dommage qu'il se 
laisse alter a des exces avec 
"mon poing dans la gueule" 
Ceci dit, on comprend qu'il soit 
enerve. 

Bon. II sen va : c'est a peu 
pres certain. Son manque 
d empressement a le confirmer 



et l aggressivite de son attitude 
tendent meme a laisser penser 
que la date est plus proche 
quon ne le pense Deux pro- 
blemes restent poses : ou va-t- 
il et qui le remplace 7 
Premier probleme. deux bruits 
circulent Tel un rat, il quitterait 
le navire avant le nautrage. La 
situation d'Apple n est pas des 
plus brillantes. la moitie du 
staff d'Apple Etats-Unis est 
deja partie : suivra-t-il le mou- 
vement ? 

Deuxieme hypothese : il irait a 
Cuppertino reioindre la mai- 
son-mere Pourquoi faire ? 
Pour combler les trous causes 
par la fuite des responsables ? 
Prendre la place de Steve 
Jobs, aussi. non f 




Deuxieme probleme : qui le 
remplacera ? On ne sail pas. 
Certains disent que ce sera 
une femme. mais que le ma- 
chisme des dirigeants d'Apple 
treine le mouvement. D autres 
disent qu'il s'agit de I'actuel 
responsable du Marketing. 
De toutes facons, on sen tout 
Soit Apple decide de changer 
radicalement sa politique et sa 
gamme. soit il coule dans I'an- 
nee qui vient. 
J ai dit. 



ALICE, A PU! 



Matra n'a pas racupere de 
zoulies commandes sur le 
contra! que le President it ,• 
fait. Tu sais. c'est le pla' 
"120.000 micros" du petit Lau 
rent que son pere il est plu- 
fort que le tien. d'abord Ces' 
meme pas juste passquc 
Thomson il a eu boucoup de 
commandes et Exelvision il a 
eu aussi un peu des comman- 
des mais moins. Matra il bis- 
que et il dit qu'il est francais 
aussi et il dit aussi que puis- 
que c'est comme ca il arrete la 
gamme Alice. la belle, celle qui 
est toute rouge. II dit aussi 
comme ca qu'il vend ce qui 
reste et apres il fabrique plus, 
na ! Et puis son papa Lagar- 
dere il est alle chercher des 
sous chez le president mais le 




president il a pas voulu et il lui 
a donne une subvention a la 
place Je crois que c'est aussi 
des sous mais j'en suis pas 
sur, en tout cas c'est pour le 
consoler et pour pouvoir faire 
des nouveaux ordinateurs 
blancs, des vrais qui marchent 
et qu'ils sappelleront "Matra 
datas systems", ou quelque 
chose comme ca. Celuikidile. 



ALGORITHMES 

ECHEVELES 



II n'y a aucune raison pour que 
vous echappiez a la regie : 
vous avez un micro et vous ne 
savez absolument pas quoi en 
faire. Bien sur, vous avez 
envie de programmer, mais 
quoi ? 

Un livre vient d'etre edile par 
ETSF : Listes et tableaux nu- 
menques en basic. C'est un 
recueil d'algorithmes sous 
forme d'organigrammes. sans 
listings. Avantage : c'est a 
vous de decider de quelle 
facon vous allez rentrer cet al- 
gorithme dans votre machine. 
en tirant profit de ses caracte- 
ristiques. Et ca vous permel de 
savoir enfin ce que vous altez 
faire avec votre becane. 
Vous pourrez decouvrir de 
nombreuses facons d'effectuer 
un tri. de classer. de recher- 
cher des elements, d'extraire. 
de concatener, de sauvegarder 
et d'operer des moyennes sur 
n'importe quelle liste, Ce bou- 
quin peut vous permettre enfin 



de programmer efficacement 
une gestion familiale ou un su- 
perbe camel d'adresses dont 
vous ne vous servirez jamais. 
mais quel pied de lecrire ! 
Tarif ? 85 petits francs, soit 66 
centimes la page, soit 33 centi- 
mes la demi-page Tres bien 
quand on a pas d' imagination. 




( c'EST UN 




L'auteur s'appelle Hunic. Et 
vous savez comment il est, 
son bouquin ? Unique, oui, 
vous aviez devina. 



FAIS-MOI UN ORIC 
DANS LE DOS 

Ben voiia qu ASN se met dans signer des accords de distnbu- 



l affaire Oric aussi Remarquez 
c'est un peu normal : c'est tout 
de meme limportateur exclusif 
Mais de la a proposer des Stra- 
tos en commande. il v a un pas 
Qu'ils ont franchi 
vous I allez 
voir. 



tion sur un MSX. pourquoi pas ? 
Les voies du seigneur sont im- 
penetrables et t nul ne saurait 
preiuoe' de ' avenir. 




Dans Micr'Oric est paru un bon 
de commande proposant une re- 
servation du Stratos. Mais, vous 
le savez autant que moi. Oric 
Products a depose son biian. 
nul ne salt qui se portera acque- 
reur de la societe en difficulte et 
les chaines de production son) 
arretees Alors 7 
Alors. Claude Taieb. directeur 
tf ASN vient de s'apercevoir qu'il 
etait proprielaire de la licence 
'dexploitation des produits Oric 
et des noms Atmos et Stratos 
pour cinq ans. Done, quel que 
soit lacquereur. il devra passer 
par lui. Et si lacquereur en 
question decide de changer le 
nom des produits. par une ha- 
bile ruse ? II y aura de toutes 
facons un Stratos. qui fonction- 
nera avec un 6502, qui ressem- 
blera fort a celui prevu par Oric. 
Oui sera peut-etre meme 
compatible, qui sait ? Et qui sera 
peut-etre fabrique par Goldstar. 
avec qui Claude Taieb vient de 



De toutes (aeons, le futur dOnc 
semble sapaiser quelque peu 
ASN a signe un accord de distri- 
bution (ils n'arretenl pas !) avec 
le diffuseur de Jasmin, le lecteur 
de disquettes C'est une bonne 
nouvelle. puisque les usines bfi- 
tanniques ne fournissent plus de 
lecteur One et que le Jasmin 2 
(il s'appelle comme ca parce 
que c'est le deuxieme modele. 
enlierement fabrique en France 
et plus au Portugal) est plus 
performant (quoique I XL DOS., 
bref) Prix prevu du lecteur (livre 
en double tete double densite) 
3490 francs Pas revolution - 
naire. c'est le cout classique de 
ce genre d'appareils 
Dernier point sur ASN I'objectif 
de vente du MSX Goldstar est 
de 25000 machines en 1985. 
Pour ce faire. ils proposent de 
prendre des parts chez les re- 
vendeurs. en leur garantissant 
lexclusivite par ville Ca va si 
mal que ca ? Non. mais c'est en 
attendant les MSX 16 bits Ah 
bon . 



HANOVRE 
RETOUR DE MANIVELLE 



Est-ce a cause du depart de 
I'mnefable Jack Tramiel. est-ce 
a cause de la recession gene- 
rale que subit le marche an- 
glais (at mondial), est-ce a 
cause dune politique de prix 
suicidaire, toujours est-il que 
Commodore est en passe de 
voir sa filiate anglaise deposer 
son bilan, 

Le Plus 4 a ete ramene au prix 
du C64 void un mois. Rdsultat 
(previsible) ; le C64 ne se vend 
plus, n'etant plus competitif. 
Etonnament. le Plus 4 ne se 
vend pas non plus ; c'est un 
appareil batard. qui n'a pas en- 
core fait ses preuves 
Le C16 ne se vend plus non' 
plus, faute de combattants : il 
est descendu a 800 francs, 
mais a ce prix-ia. les reven- 
deurs n'ont plus de marge, et 
arretent de le vendre. Plus de 
C16 en boutique 
Le C128 nest pas encore la, 
et semble freiner sensiblemeni 
les ventes de I'ensemble de la 
gamme. II a ete presente 
comme un concurrent serieux 
du prochain Atari : les ache- 
tems potentiels attendant de 
voir ce qu'il vaut vraiment, Si il 
est vendu au prix annonce, il 
est bien plus interessant que 
tout le reste de la gamme. En 
passant, il nest toujours pas 
pr6vu en France. Et I'dcran a 
cristaux liquides qui devait 
equiper I un de ses avatars a 
ate abandonne definitivement. 
Apparement, Commodore est 
hors-jeu. Ce nest pas le cas 
d'Atari et d'Amstrad Ce der- 
nier vient de presenter son 
CPC 664 et a la ferme inten- 
tion de le mettre en vente d'ici 
une semaine. Les revendeurs 
qui rejetenl maintenant la 
gamme Commodore se battent 
pour etre les premiers a avoir 
le 664. Atari est. o combien. 
dans la course puisque le 130 
XE est un concurrent direct de 
r Amstrad et que le 520 ST est 
un concurrent direct de prati- 
quement toutes les machines 



Atari nous a confie son inten- 
tion de delaisser la version 128 
Ko de sa nouvelle sene au 
profit de la version 512 Ko 
Une politique qui semble suivie 
par les revendeurs anglais ils 
n'ont pas commande de 128 
Ko (pourtant disponible en pre- 
commandes), mais ont deia 
des options pour le 512 Ko. 
"C'est la machine que nous ai- 
tendions Elle est la seule a 
pouvoir faire evoiuer la situa- 
tion", a declare le responsable 
commercial de Lasky. un des 
plus gros revendeurs londo- 
niens. 




Seul franc-tireur ; Boots C'est 
LE plus gros revendeur en 
micro en Grande-Bretagne II a 
decide de ne pas revendre le 
CPC 664 el nest plus en pour- 
parlers qu'avec Atari Appare- 
ment, c'est le seul ordinateur 
qui sera disponible dans les 
succursales de sa chaine pro- 
chainement 

Dites. vous avez remarqua 
quelque chose ? Le OL, il ne 
serait pas un petit peu sur la 
louche, par hasard ? 
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HIPPiJ "> nou veau, 
IfyV^T / f ' r automati Que 

C'esl toujours japonais, c'est toujours costaud, mais. en 
plus, 9a 8 un autofire. C'est a dire que, si vous laissez un de 
vos doigls appuye sur un des boutons, le tir sera a repeti- 
tion, c'est pas beau ca ? Pour le reste rten de change : trois 
boutons de tir, une bonne prise en main et quatre ventouses 
pour le colter detinitivement sur la table de la salle a manger 
(super-pratique pour les repas !) Prise stantard pour Atari, 
Commodore 64, Vic 20. Compatible avec les interlaces 
One et Spectrum. Pour Apple, Thomson, Texas, Machbro et 
Trucmuche, Tintin : 9a ne marche pas ou alors il taudra bl- 
doulller. 

Ah, au fait, c'est plus cher que I'ancien, 120 balles ! De toute 
facon, de I'ancien il n'y en a plus alors... 
C'est bon, c'est pas trop cher ? Envoyez vos sous apres 
avoir rempll le bon de commande ci-joint, Le mlnistre du 
commerce exterfeur du Japon vous remercle bien bas. 
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*********** # -fr <r *r £■ 
Bon de commande a decouper et a renvoyer a 
SHIFT EDITIONS, 27 rue du General Foy 75008 
PARIS. 

Nom 

Pr6nom 

Adresse 

DATE : PU = 120 F ... x ... - ... F 

frais d f envoi = +1SF 

cheque joint : TOTAL = .... F 



HEBDOGICIEL SOFTWARE 

Le logiciel a sa juste valeur 

Les nouvelles boites jaunes sont arrivees ! Six logiciels francais de qualite par cassette et un prix raisonnable : des 
produits signes SHIFT EDITIONS ! 



L AVENTUflE SUR OfUC 



Unjeud'aventure cavaSix jeuxd'aventure, bonjour les nulls blanches! Vous al- 
le/devenir tour a tour explnrateur.espion.egyplologue.cosmonaute. super he 
rosetvictimeduceiAb'edocteurParanaud Sivousarnvezauboutdecessixcas 
se tele sans proWemes de sante el sans troubles mentaux. vous deviendrez 
sans conteste un des grands martres mondiaux du jeu d'avenlure ! Unecassette 
pleine a craquer pour 120 francs 

Voire One utilise le langage machine pour reflechir et vous n'avez malheureuse- 
ment que voire cerveau humainpourle battreau Morpion! Le"Laby5"quisuil 
nest pas plusracile: cinq etages. des trappespartoul el sesascenseurs pas tres 
liables' Dans "Oil leak", vous devez reparei une voilureau beau milieu de gran- 
desflaquesd'huile Les gouffres, les ravins el les precipices de"Pont-levis'vonl 
vous rendre (ou ! Le "Parsec" lonce a toute vitesse et la "Guerre nucleaire" est 
(out simplement le premier grand Wargame pour One 120 francs la C 



"Dork crystal" est sans nul doule un 
des plus beaux et rapides jeux 
ecrits pour Tl 99 : voire heros doit re- 
cuperet des fragments de cnstal dans 
le labyrinthe qui esl le lieu a la mode 
pour tous les monstres branches de la 
galaxie ! Les autres jeux sont tout aus- 
sietficaces:unsuperbesauteursursa 
pyramide, un duel pour deux joueurs 
en armure. un casino avec 3 jeux de 
cartes, une cenlrale nucl6aire et "Mis- 
sion p&rilleuse" qui vous Iransportera 
dans une jungle hostile endeux somp- 
lueux tableaux. 120 francs les 6 jeux 
en basic elendu 
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BASIC ETENOU 
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SPECTRUM N"1 
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Des |euxd arcade a gogo changezle 

cours del'histoitea Pearl Harbour, gui 
dezAI'bertelKongdansleurpyramide 
favorite, jouez a un jeu de balle en- 
tierement nouveau, construisez 
d'enormes murs avec voire grue de 
chanlier etregalez-vous avec dela te- 
quila : plus vous en buvez. plus vous 
d£samorcez facilemenl les bombes 
de "Caramba"' Six super-program- 
mes pour 120 francs 

Deux jeux d arcade ou vous serez 
un courageux pompier, ou pilole 
d'unemotodecourselonctionnantau 
langage machine. Viennenl ensuile la 
reflexion avec "Puzzle" et la stategie 
avec "Mmeur"ouvouspourrez organi- 
ser des competitions jusqu'd S 
joueurs L'aventure enfin avec "Linca 
dor", un fabuleux jeu graphique en 3 
dimensions 6 super-programmes 
pout t20 francs. 



Des jeux, de reiectncite et du plaisir, 
voiladequoifairetretillerleseieclrons 
dans voire M0S et quand en plus ces 
jeux sont multiplesetdouzevousenvi- 
sagerez quelques nuits blanches 
dOthello.de Poker, de M^mo 7 Des 
que I'lmmobilite vous parallra insup- 
portable, parfez pour lespace pro- 
fond (Worp) ou relrouvez vos amis (li- 
Chier d'adresse) Vous verrez, vous 
n'encroirez pas plus vos yeux que vo- 
tre M05 n'en croira ses jeux ! 

A BON DE COMMANDE A REN- 

* VOYER A SHIFT EDITIONS. 27 

* rue du Gal Foy 75008 PARIS. 
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ZX 81 N"1 



SPECTRUM N ,J 1 

* TEXAS N 4 
. ZX 81 N 11 1 

* M05NM 



120F 
120F 
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120F 
120F 
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- REGLEMENT JOINT OOF 



DEUX SUPER-CONCOURS PERMANENTS 

20 000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE pour 2 
personnes en CALIFORNIE au meilleur logiciel du TRIMESTRE. 



Un concours de plus! 
Rlen de bien original dans 
cette tormule, pourtant nous 
essayons de laire quelque 
chose de different: nous orga- 
nisons un concours perma- 
nent tous les mois et tous les 
trimestres! Et avec des prix 
dlgnes des programmes que 
vous allez nous envoyer! 
De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes preferes 
sur la grille recapitulative 
mensuelle. 

Pas de jury, pas de decision 
arbitrage, HEBDOGICIEL n'in- 
tervenant que dans le choix 
des programmes qui devront 
etre ORIGINAUX et FRAN- 
CAIS. Si voire programme 
n'est pas tout a fait au point, 
un de nos specialties vous 
dira comment I'amellorer pour 
pouvoir nous le proposer a 
nouveau. 

Pour partlciper, il vous suffit 
de nous envoyer vos pro- 
grammes accompagnes du 
bon de participation alnsi que 
toutes les explications neces- 



saires a I'utilisation de ce pro- 
gramme. 
Bonne chancel 

Reglement: 

ART.1: HEBDOGICIEL organise 
de facon mensuelle et trimes- 
trielle un concours dote de prix 
recompensanl le meilleur logiciel 
du mois et du Irimestre. 
ART.2: Ce concours est ouvert 
a tout auteur de logiciel quelque 
soil le materiel sur lequel il est 
realise. L'envoi dun logiciel en 
K7 ou disquette accompagne 
dun bon de participalion de- 
coupe dans HEBDOGICIEL 
constilue lade de candidature 
ART.3: La redaction d'HEBDO- 
GICIEL se reserve le droit de 
selection ner sur la base de la 
qualite el de lorigmalite les logi- 
ciels qui sont publies dans le 
journal, 

ART.4: Ce sont les lecteurs qui, 
par leur vote, delerminent les 
meilleurs logiciels mensuels et 
trimestriels. 

ART 5: Le prix alloue pour le 
concours mensuel sera remis au 
plus lard un mois apres la clo- 
ture du concours mensuel 



ART.6: Le prix alloue pour le 
concours trimestriel sera remis 
au plus lard un mois apres la 
cloture du concours trimestriel. 
ART.7: Le present reglement a 
ete depose chez Maitre Jauna- 
tre 1 rue des Halies 75001 
PARIS 

ART.8: HEBDOGICIEL se re- 
serve le droit d' inter romp re a 
tout moment le present 
concours en avisanl les lecteurs 
un mois avant. 

ART.9: La participation au 
concours entraine I acceptation 
par les concurrents du present 
reglement 

HEBDOGICIEL: 27 rue du Gal 
Foy 75008 PARIS. 

Sera declare gagnant le pro- 
gramme qui aura obtenu le 
plus tort pourcentage de vote 
par rapport a la tot a lite des 
programmes recus pour un 
meme ordinateur. 
Ainsi, pas de favoritisme pour 
les ordinateurs plus puissants 
ou tres diffuses. 



BON DE PARTICIPATION 



Nom 

Prenom 

Age Profession 

Adresse 

N telephone 

Nom du programme 

Nom du materiel utilise 

declare etre I auteur dece programme qui n est m une imitation m une 
copie d un programme existant Ce ptogran-.me reste ma propnete el 
j aulonse HE8DOGICIEL a le pubher La remuneralion pour les pages 
pubhees serade 1000 francs par page (un programme n occupant pas 
une page entiere sera remunere au prorata de la surface occupee) 

Signature obhgatoire 

(Signature des parents pour les mineurs) 

Le programme doit etre expedie sur support magnetique (cassette ou 
disquette) accompagne dun descnpM detaiile du materiel utilise 
dune notice dutihsation du programme Les supports des program- 
mes publies sonl conserves n oubliez done pas den faire une copie 



10.000? 
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AMSTRAD 

CHERCHE posse sseur d'Ams- 
trad pour echange de logiciels et 
genereux dortateur du 280 de 
Zaks Pierre Vergez. 2 rue 
Chanzy, 08240 Buzancy. 

ECHANGE logiciels pour Ams- 
trad. Laurenl, tel ; 597 44 32 a 
partir de 19h, 

CHERCHE possesseur d'Ams- 
trad pour echange de logiciels, 
jeux. ulilitaires, etc... Christophe 
Asselin. 574 rue du pressoir lon- 
neau, 45160 Olivet. 

CHERCHE tous programmes de 
qualite pour Amstrad B. Fous- 
sat, 1 1 rue A. Belhommet, 
29220 Landerneau Tel ; (98) 21 
52 21 apres 18h. 

CHERCHE possesseur d'Ams- 
trad pour echange de logiciels. 
d'idees, de trues Jean-Louis 
Rose. Plouy Domqueur, 80620 
Domart en Ponthieu 

VENDS ou echange pour Ams- 
trad, nombreux logiciels contre 
d'aulres logiciels ou contre me- 
thods Linguaphone langue 
Arabe ou Anglais, ou Espagnol. 
M, Chehmana, 89 rue P. Bou- 
dou, 92600 Asmeres 

CHERCHE pour Amstrad Maca- 
dam Bumper, Theatre Europe. 
Raid on the bungeling bay et 
Phantom zone. Les echangerais 
contre 60 a 80 logiciels, au 
choix. Ecrire a Jean-Marc La- 
croix, 37 rue de Launay. 28000 
Chartres 

ECHANGE de nombreux logi- 
ciels pour Amstrad Andre Alca- 
raz, 21 rue de bellevue, 77148 
Salins. Tel : (6) 431 75 74. 



CHERCHE contacts hard et soft 
pour echanges trues et program- 
mes sur Amstrad. Elbaz, 1 petite 
rue de I'Eglise. 67000 Stras- 
bourg. Tel : (88) 23 15 77. 



VENDS ou echange logiciels 
pour Amstrad. Francois Marty, 
87 rue Pierre Mourgues. 81000 
Albi 

CHERCHE contact Amstrad 
pour trues et astuces. Vends 60 
numeros de IHHHHebdo ; 150! 
M Thibaud, Residence Karine, 
BAT G4 APP61, 17440 AYTRE 

CHERCHE quelquun qui ne 
cherche pas un possesseur 
d'Amstrad Ecrire a NDG au 

journal. 

POSSESSEUR Amstrad echan- 
gerais logiciels Tel : (76) 36 78 
68. 

VENDS ou echange de nom- 
breux logiciels pour Amstrad. 
Rodolphe Paschini, 32 bis rue 
du 8 Mai. 76300 Sotterville les 
Rouen Tel : (35) 72 35 08 

VENDS Amstrad, moniteur cou- 
leur. Fevrier 85. prix 38001 28 
programmes jeux et educates 
700(, liste sur demande. Rene 
Suire, 68 rue Archereau. 75019 
Pans Tel ; 201 18 31. 

VENDS Amslrad couleur. impri- 
mante DMP1. 2 joysticks neufs 
sous garantie. divers jeux. 2 
livres "Amstrad 56 programmes 
et "Premiers pas en basic" Va- 
leur totale neuf : 77001. vendu 
6500f. Vends aussi les 59 pre- 
miers numeros d'ABC informati- 
que (manque 2 numeros) : 400t. 
Tel ; 594 85 32 apres 20 
heures 



VENDS pour Apple lie program- 
mes de chauHage - climatisation 
- economies denergie. calcul G 
et B. selection materiel - dessms 
a lecran de chaufferies et de 
niche avec encombremenl - cat- 
culs apports solaires chauffage 
ECS piscine - selection cellules 
photo-voltaiques suivanl region 
et besoms JH Fave. 1 place du 
8 mai 1945, 06510 Carros. Tel 
(93) 08 70 17 NDG Vends 
programme delaminage de sea- 
teles tetrahydrocannabmiques 
avec calcul des moyennes. des 
reflux cosmiques et representa- 
tion graphique du tout en ecu- 
leurs- Baleze. hem ? 

VENDS Apple He comprenan' 
unite centrale. moniteur vert. 
disk II avec contrdleur. carte 80 
colonnes etendue, manuals et 
DOS 33, ProDOS. Appleworks 
en frangais (traitement de texte. 
tableur, gestion de fichiers). mul- 
tiplan en frangais. Lode Runner 
ulilitaires pour la programmation 
basic et machine Materiel 
achete en Avnl 1984, Ires peu 
utilise el partait etat (emballage 
dorigine). 12000 francs. G 
Cambianica. Bureau : 947 09 54 
ou domicie : 387 99 81 



VENDS Apple II + .64 Ko. 2 
drives, Z80. rub, langage, super- 
sede . coffret, clavier program- 
mable IBM : 9700f Tel : 038 96 
65. 

VENDS Apple lie. souris. joys- 
tick. 30 logiciels (utilitaires et 
jeux). livres. de fevrier 1985 : 
11.000f. Tel : (6) 944 39 04 ou 
(6) 048 16 33. NDG: Ten as 
deja marre ? 

URGENT : A VENDRE DIREC- 
TEUR GENERAL de societe 
dimportation d'ordinateurs ame- 
ricains. Garanlie terminee mais 
excellent etat. Prevoir revision 
du langage residenl. Ecrire au 
journal qui transmettra. 

VENDS Apple II+ . 1 drive, 
joystick, carte langage. moniteur 
vert, livres. programmes. Region 
Languedoc Tel : (67) 65 95 34 
en soiree 



PON PON PON POOOOOON 
La galaxie est sur lescalope mi- 
lanaise 

VENDS Atari 600 XL * lecleur 
de cassettes ■+ moniteur * 2 
jeux (Super cobra et Star rai- 
ders) : 3000f. B. Blanc-Potard. 3 
allee des hetres verts. 77200 
Lognes. Tel : 005 03 24 apres 
18h. 

VENDS VCS Atari 2600 + 2 
paddles + Donkey Kong * 
Breakout + Pac man + Space 
invaders + Combat + Circus 
Atari + Jungle hunt, le tout en 
tres bon etat : 1800f, a debattre 
Joel Bergdoll, 40 av. du mare- 
chal Leclerc, 08000 Charleville- 
mezieres Tel : (24) 59 28 89 
aux heures de repas, NDG 
"Alio ouich, echcujez-moi. /e 
chuis en tram de mancher" 

VENDS Atari 800 XL sous ga- 
rantie + lecieur de cassettes + 
interlace Secam peritel + livre 
basic Atari : 2200f Moniteur 
couleur Oscar : 2300f. 2 manet- 
tes Spectravideo : 150f. Simula- 
teur de vol Solo flight. Spitfire 
ace. Jungle hunt. Donkey kong. 
Decathlon : 80f chaque Tel 
011 40 61 apres 19h 
NDG "Onano flight ?" 



VENDS Atari 600 XL. etat neuf. 
encore sous garantie pendant A 
mois : 13001 Franck Page. 24 
route de tavant. 37220 lie-Bou- 
chard. Tel (47) 58 53 36 apres 
18h 

CANON 

CHERCHE HHHHebdos entre le 
76 et le 81 Cherche imprimante 
thermique X 711 ou imprimante 
graphique 4 couleurs X 710 - 
dispositif dexlension + cartes 
de memoire XM 101 • fichiers 
XP 110 * table de calcul XP 
120 ~ graphes XP 130 - sys- 
teme RS232C - programmes 
utilitaires de preference sur cas- 
sette Faire oftre a : Laurent 
Burg. 14 rue des roses 67800 
Bischheim NDG ; XX f 



CASIO 

Vends FX-702 P, bon etat 
(Casio) + Imprimanle Casio FP- 
10 + 7 rouleaux de rechange - 
livres de programmation basic * 
nombreux programmes (environ 
150) de |eu. de maths Le tout 
890 francs F BIGOT Tel 13) 
050 97 65 Le week-end et 
lapres-midi 

Cherche FX 602-P pour 300 
francs maximum ou FX 602P • 
FA 2 (et ou) FP 10 pour 600 
francs maximum Tel 066 12 
55 Eric SIMON. 6 rue des Mo- 
heres a Sainl-Sauveur sur 
Ecole. 77930 PERTHES 



Vends Commodore 64 * 400 lo- 
giciels (copieurs. Busicaic I et II. 
Decathlon, Xper. Ultima 1. 2 et 
3. Ghostbuslers. Summergames 
1 et 2...) + unite de Disk 1541 
+ Magneto + nombreuses docs 

* bouquins (psi, hebdo. tilt) *- 
interface Pal Secam : Prix a de- 
batlre. Demander Michael au CI 
376 90 56 

Pout Commodore 64 echange 
jeux : Zaxxon. Fori Apocalypse, 
Jeep. Ghostbuster, Raid Over 
Moscow, Bruce Lee, Pooyan 
(en tout une quarantine) contre 
d'aulres ieux uniquement en K7 
(Pole Position, Spy Hunter. Pit- 
fall II. On Court Tennis. . ou 
d'aulres I). Envoyez vos listes a 
Gwenael ROPERT. 24 rue de 
Touraine. 56300 PONTIVY. Tel : 
(97)25 34 16, 

Pour Commodore 64. grand 
choix de programmes a echan- 
ger. reponse assuree Contactez 
David GRODWOHL. 5 Maison 
Blanches. Gaironeville, 76700 
HARFLEUR Tel : (35) 20 49 39 

VENDS Commodore 64 RVB 
Peritel + Lecleur de disquettes 
1541 + Lect K7 + Vic Plotter 
1520 + 3 manettes + Super 
Base 64 i Easy Script + Xper 
-> Tool 64 ■* Extra Tool + Auto- 
tormation Basic + Assembleur 

* Nombreux jeux : Lode Run- 
ner. Flight Simulator II, Zaxxon, 
Grandmaster. Materiel sous 
garantie 13.000 francs a debat- 
tre. Tel : (6) 046 48 77. 



COMMODORE 

VENDS Commodore 64 RVB 
Peritel + Lect disquettes 1 54 1 
+ Lect K7 + Nombreux pro- 
grammes (une centaine) 
Joysticks (Quick Shot II. Atari) + 
Livres et revues : 6500 francs a 
debattre Tel : (1) 348 18 61, 
Corinne 

VENDS Commodore 64 + Peri- 
tel + Lecteur de disquettes 
1541 - Nombreux jeux sur dis- 
quettes Le tout 4000 francs 
Tel : 791 47 71. 

Pour Commodore 64 echange 
ou vends (dans leur embal- 
lage) Corman (100 fr). Pancho 
(95 fr) Tic Tac Toe (95 fr. 100% 
langage machine). Achete entre 
5 et 20 francs tous jeux. en- 
voyez-moi vos listes ! Laurenl 
POUPIN-FRAUDEAU. 312 route 
des Landes de la Plee. 44115 
BASSE-GOULAINE, Tel : (40) 
34 26 55 



Vends Hector 16 Ko BR sous 
garantie \ 12 K7 (Edu-basic, 
Micro chess. Goofy Golf. Rega- 
les. Sous-marin.) t Livres. 300 
francs. Ecrire ou telephoner 
(apres 18h00) a Jean-Francois 
MOURIER, 32 rue Jules 
Guesde, 42800 Rive de Gier. 
Tel 177)83 87 66. 



ECHANGE jeux MSX (j'en pos- 
sede environ 20) : Decathlon, 
Hero. Time Bandits, Pacman. 
S'adresser a Emmanuel GON- 
ZALEZ. Tel : (93) 61 30 18. 
Apres 18h00. 

CHERCHE a etre le seul, Ecrire 
a tous les distributees MSX 



ORIC 

VENDS One 1 48 K + magneto 

+■ interface NB ou peritel + syn- 
thetiseur de voix + cane mere 
+ 8 livres + 7 Theoric et Micro- 
ric + 90 logiciels en tous 
genres Valeur 6500f. vendu 
2500. Tel (94) 75 45 72. 

VENDS One Atmos 20001 avec 
prise peritel (alim comprise) + 
lecteur de cassette - i adapta- 
teur joystick - 1 |oystick + 
adaptateur secam UHF + 7 K7 
de |eu (Super Jeep. Zorgon's 
Revenge, Ultima Zone. Harrier 
Attack. Citadelle ) ♦ 3 guides 
differents de t'Onc Atmos. Va- 
leur reelle 30001 Axel Calvet. 
722 43 75 apres 19h30 Neuilly 
Sur Seine. NDG pourquoi tu ne 
cites que 5 jeux sur les 7 ? Les 
deux autres sont si pourris que 
ca ? 

CHERCHE imprimante pour One 
Atmos. Faire propositions. Chris- 
tian Dutilh, les traverseres. 
Louey, 65290 JUILLAN. Tel (62) 
35 40 19 

VENDS Atmos. alimentation, pe- 
ritel, modulateur NB. lecteur de 
disquettes, modem, tele NB 31 
cm, livres. 450 logiciels. even- 
tuellement separement. Prix a 
debattre. Michel Potier, 42 rue 
Voltaire, 94190 Villeneuve St 
Georges. Tel : 389 62 44, 

A VENDRE, usine d'ordinateurs 
presque neuve. Ecrire a I'usine 
ou a Denis Taieb ou a ASN ou 
a JC Talar ou... 

VENDS Oric Atmos 48K, ali- 
mentation, magnetophone Har- 
vard (tous deux encore sous ga- 
rantie), peritel, cable NB, 
manuel de I'Oric, Cahiers du 
basic sur OA, 50 programmes : 
2200i Tel : 658 57 89 

VENDS Oric Atmos 48K (de- 
cembre 84), peritel, alimentation, 
4 K7, nombreux listings : 1500L 
Francois Devaluez, 13 avenue 
de la liberation, 86000 Poitiers, 
Tel : (49) 58 39 28. NDG Mais 
neuf, ca vaut 1579 francs ft! 

VENDS Oric 1 48K avec cables, 
plusieurs jeux. Le tout I100f, 
Tel : 241 34 27 (Paris). 

VENDS Oric Atmos. 35 pro- 
grammes, adaptateur peritel. 
livres: 2100L Thierry. 805 97 



VENDS Oric 1 48K. cordon peri- 
tel, alim peritel. modulateur NB, 
manuel, K7 demo, interface 
joystick, jeux : 1300f. Jean-Marie 
Gautier, (47) 51 30 43. 
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OUVERT DU MARDI 
AU SAMEDI DEX)hA19h 



89 bii. rje de Chotenlon 75012 PARIS 
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metro : gore de Lyw et Ledru-Rollin 



BLANC BERNARD 

INFORMATIQUE BUREAUTIQUE LYON 

AMSTRAD - SINCLAIR - ORIC 

SHARP - THOMSON - SANYO 

LEANORD - LOCYSTEM 



9, rue Salomon Reinach. 69007 Lyon 
Tel. : (7) 872.25.48 (pres facultes) 

ASSISTANCE TECHNIQUE - LOGIC1EL - FORMATION 



VIDE V SHOP 



L'espace le plus micro de Paris 

VIDEO SHOP, e'est le plus grand choix de 

logiciels au mf. C'est aussi de tres nombreuses 

marques : 

- ATARI - LANSflY - COMMODORE 

- AMSTRAD - MSX - THOMSON 

- SINCLAIR - ADAM - EXELYISION 

Passez nous voir nombreux A LA FOIRE DE 
PARIS STAND 2L26 , nous vous y attentions 
jusqu'au 8 mai. 

50, rue de Richelieu 75001 PARIS. 296.93.95 
251, bd Raspail 75014 PARIS. 



VISMO 

Vente informatique service micro ordinateurs 

ORIC, SINCLAIR, AMSTRAD 

Moniteurs couleur et Nil. 

Tous peripheriques 

ASSEMBLEUR MONAMS 
Recommande par Hebdogiciel 

84. bd Bcaumarc hais 75011 PARIS 

12. bd de Reuillv 75012 PARIS 
338.60.00 



VIDEO 107 INFORMATIQUE 

♦ ♦ ♦ ♦ ♦ 

PLACE DES FETES 
75019 PARIS 

SINCLAIR QL 5 490 F 

SPECTRUM + 1 900 F 

CBM64 + Lect. K7 2 990 F 
ORIC ATMOS 1 690 F 

AMSTRAD VERT 2 990 F 

Tel. : 201.22.34 - 201.46.09 




le temple d AMSTRAD 

Iniiies d HEBDOGICIEL, venez. en pelennage. 
visiter le plus fabuleux monument consacre a 
AMSTRAD en France. 



CADEAU DE BIENVENUE 

a tous les fideles rnunis de cette annonce 



10, boulevard de Strasbourg 
75010 Paris S 206.50.50 



Heures de culte : 9 h 45 a 13 heures - 14 a 19 heures 
tous lesiours saufdimanche 




SPECTRUM 

PON PON PON POOOOON 
La fete est finie. la facture noc- 
turne est trop lourde. 

VENDS Spectrum 48K peritel : 
18001 Interface programmable 
(type Stoneship) : 125) Quick 
Shot II : 75f. Magneto Pathe 
Marconi ; 400f 16 K7, program- 
mes, 2 livres 'The Spectrum po- 
cket book", "langage machine, 
trues el astuces", manuel basic, 
le tout 24001 ou echange contre 
CBM64 + magneto. Region pa- 
risienne. Tel : 854 35 20 apres 
I7h, NDG : Desole. e'est plus la 
claviste qui tape les P.A.. e'est 
Georges. Mais d'accord pour le 
bisou et le rencard 

VENDS Spectrum "4 " 48K. pe- 
ritel, modulateur NB, 20 logi- 
ciels. Prix : 2400f. Jean-Claude 
Barbier. 602 05 54. 

VENDS Spectrum 48K. peritel. 
interlace S Z1 el Z2. microdnve, 
poignee, basic etendu, pascal, 
programmes, livres, revues 
4000f. Christian, (1) 757 26 71 
apres 20h. 

VENDS Spectrum " + " 48K. pe- 
ritel, interlace Kempston. 2 ma- 
nettes. interface NB, magneto. 
30 super logiciels en cadeau 
Mattel, 10 cartouches. HHHHeb- 
dOS 65, 68. 68, 70. 71. 80. Le 
tout : 4500f. Mariani. 5 rue Re- 
chossiere, 93300 Aubervilliers 
Tel : 852 45 85. NDG . Tas mis 
deux fois le 68. 

ACHETE Extension 48K pour 
Spectrum Tel ' 964 71 44 



TEXAS 

VENDS separemenl TI99 4A, 

peritel. alim (12001), module be 
+ manuel (600f), module mini- 
memoire + K7 ♦ manuel + doc 
(700f). Modules jeu (Blaslo. 
Munchman) + prog. K7 + ma- 
nettes (3501) ou le tout avec doc 
technique 2300t. Tel (96) 48 52 
47 le soir 

CHERCHE module Tl CALC 
Contacter M. Rouffignac Tel : 
(94) 68 54 57 poste 3485 aux 
heures de bureau, ou au (94) 67 
30 32. 

VENDS TI994A (10 mois) avec 
lecteur de cassettes amsi que le 
cable de raccord avec 2 manet- 
tes de Jeu, 4 modules (Parsec. 
Tl Invaders, Tombstone City el 
Aligator-Mix) plus de nombreux 
programmes et la documenta- 
tion Valeur estimee : 22001 
Laisse a 1500! a debattre. Nico- 
las Marques, 69 Bd Bineau, 
92200 Neuilly Tel : 757 47 21 



TI99 

VENDS Tl 99 peritel + basic 
etendu + 100 jeux sur casset- 
tes : 15001 Gilles Laine. 6 che- 
min de la montagne, 891 13 
Fleury la Valine Tel ; (86) 73 77 
99 

NDG : T'es de la montagne ou 
t'es de la vallee ? 

VENDS pour Tl 99 cinq modules 
de jeu : Mash. Tombstone City. 
The attack, Munch Man. Super- 
demon attack. Le lot : 5501 M 
Bach. 78 av. des acacias. 17420 
St Palais sur Mer 



VENDS Tl 99/4A + manettes + 
cordon cassette + 7 modules + 
programmes sur K7 : 15001. 
Tel : 421 23 35. 

VENDS Tl 99/4A + rien du tout. 
Manettes completement petees, 
clavier manque trots touches ali- 
mentation grilles (Je lai tran- 
che sur la prise force de la ma- 
chine a laver). Prix cher, tres 
cher Ne telephonez pas. n'ecri- 
vez pas, ne parlez pas, ne bou- 
qez plus 



VENDS Tl 99 - peritel - ma- 
nettes + Wumpus 15001 Cas- 
settes de jeu Parsec. Munch- 
man. Othello, Tl invaders. Star 
Trek : 600f Basic etendu 500f 
ou bien le lout pour 25001 (va- 
leur reelle 35001 ) Tel (93) 54 
38 08 enlre 18h30 et 19h30. de- 
mander Chnstophe Meyer 

VENDS Tl 99 4A + peritel * 
cordons + hvres + cassettes et 
listings + module Tl invaders * 
maneltes : t500f Tel : (89) 76 
83 71 

VENDS Tl 99 4A +4 cassettes 
(Tombstone city, demon attack, 
mash, burger time) + cordons * 
joysticks + nbreux programmes 
+ manuel. le tout en tres bon 
etat : 21001 Tel (4) 453 30 25 
apres 18h, demander Jean-Mi- 
chel. 

CHERCHE clients. Ecrire regie 
a calcul 

VENDS Tl 99.4A + cordon ma- 
gneto + basic etendu + parsec 
+ manettes de jeu + program- 
mes bs et be : 1800f M Lavi- 
gne (Lyon) Tel : (7) 826 00 37 
le week-end 

VENDS Tl 99 4A + magneto + 
cable magneto double + joystick 
+ peritel : 1800f. Boitier dexten- 
sion + carte 32 K ^ conlroieur 
et lecteur de disquettes ; 6500f. 
Basic etendu : 600f Editeur as- 
sembler : 500f. Modules : Par- 
sec, Munchman. Car-wars. In- 
door soccer. Tombstone city, 
Aljiner, Tl invaders. Hustle, Ad- 
dition et soustraction : 2001 
piece ou 150Of lensemble Cas- 
settes . Lunar lander II. basic 
auto-education, basic etendu par 
soi-meme : 50f piece. Disquette 
Programing aid III : 200f. Revue 
99 Magazine + cassettes n° 1 a 
8 + abonnemenl en cours (reste 
2 numeros) : 500f. Livres : De- 
couverte du Tl. conduite du Tl, 
Boite a outils. Pralique du Tl ni- 
veau II, Jeux et programmes 
pour Tl n° 1 et 3, Initiation au 
langage assemh'eur ; 600! le 
tout. Programmes sur disquettes 
(valeur de lensemble 16.000f) 
vendu 120001 a debattre. Tel 
(1) 830 58 56 le soir. NDG: Si 
tu vends ta chemise, je suis pre- 
neur 



CHERCHE apres Iilme Ecrire a ZX 81 
Roro qui klaxonnera 



VENDS Tl 99 4A + Basic 
etendu (manuel francais) + ma- 
nettes de jeu - 4 revues Tl * 
Interface Secam UHF + jeu 
Othello 2000f (valeur 3800) 
Tel : (99)57 92 16 

CHERCHE lecteurs Ecrire a 

Micro7 Tres urgent 



CHERCHE a plaire Faire offre 
au journal 



VIC 20 

VENDS Vic 20 + 8 Ko + Lec- 
teur de K7 + livres + autres : 
1500 francs. Tel: 605 81 62 
(Pans), apres 18h00, demander 
Remi 

VENDS pour Vic 20 cartouches 
en TBE ; Voodoo Castle + Pira- 
tes Cove + Adventureland : le 
lot 350 francs. Radar Rat Race 
■+ Menagerie + Alien : le lot 350 
francs. Sort - Sargon 11 chess 
+ Avenger : le lot 350 francs; ou 
le (out : 900 francs. Tel : 241 81 
65 (apres 18h00). 



VENDS Vic 20 (5 83) + moni- 
teur vert Zenith + Lecteur de K7 
+ Joystick 1- i cartouche de jeu 
* 1 K7 de jeux + nombreux 
livres (jeux el apprentissage) - 
tres grande quantite de pro- 
grammes, le tout en archi bon 
etat 2400 Irancs. Stephane Gl- 
RARD, 136 rue Jules Guesde. 
93220 GAGNY. 

VENDS Vic 20 Pal + adaptateur 
NB secam + magneto K7 + au- 
toformation au Basic avec 2 K7 
el manuel + 6 livres + 7 cartou- 
ches de jeu + 16 Ko + Super 
Expander + Assembleur 6502 
+ Programmation d'EPROM. Le 
tout 2500 francs a debattre. 
Vente au detail possible. Chris- 
tian CHARRIERE. 26 rue Hector 
BERLIOZ. 25000 BESANCON. 
Tel (81)88 36 09 



VENDS pour ZX 81 16 Ko. ma- 
gneto, cables, casque. 12 
HHHHebdos, t Soft el Micro, au 
pnx fantastique de 500 francs 
au heu de 550 Flonan Galtier. 
56 rue d'Assas, 75006 Pans 
Tel (1)548 07 87 

VENDS ZX 81. 16 Ko. manettes 
de jeu. Slock car, Asteroides, 
GulF II. Bombers. Raiders ... 1 
classeur enlier de programmes 
IK et 16K. le lout 8001 Vends 
aussi. pendanl qu'on y est, un 
Atari CX 2600 pour 500 francs, 
un jeu video "balaille de lanks" 
pour 200 Irancs. 1 ordinateur de 
jeu dechecs 150 francs, 1 cas- 
sette Inlellivision "Donkey Kong" 
pour 100 balles. Jean-Marc 
Koin. 122 Rue leran, 13005 
Marseille, cong. lei : (91) 47 83 
89 NDG Vends deux pommes 
de terre. cinq avions, une casse- 
role sous garantie et un eplu- 
choir (pour les pommes de 
terre) 



DIVERS 

EXTRAORDINAIRE !! Echange 
la solution des cinq aventures 
d'Eureka contre 5 a 10 logiciels 
par aventure. Olivier MONTBA- 
ZET. 8 allee des Trous Geles 
77220 TORCY. NDG; Ouais. 
genial, fou. dement, ouais. 

ECHANGE TOUT et le reste. La 
preuve : 4 K7 Oric contre 10 
timbres a 2,10 Irancs. Codes Mi- 
nitel sur le 613 contre message- 
ne nouvelle. Livres (ecrire pour 
la liste) contre livres de Science 
Fiction (cherche dans la serie 
Livre de Poche. la Grande An- 
thologie de la SF : Histoire 
de...). Cherche posters de ci- 
nema; SF, Horreur... Echange 
timbres de collection. Pour toute 
liste. joindre un timbre pour la 
reponse. Reponse assuree a 
200%. Contactez Thomas 
BOUSSER, 24 rue Mangin, 
57500 SA1NT-AVOLD. Tel : (8) 
792 61 97 Apres 17h15 sauf les 
jours de conge scolaire ! Ne te- 
lephonez qu'en cas durgence. 
NDG : Tequipe te retourne ta 
bise et Scratch Track te felicite 
d'aimer la SF. Note du Vrai 
Georges Scratch Track????? 



VENDS Impnmante Seikosha 
GP 50S * rallonge cable (ordi- 
nateur-impnmante) et tele 
Brandt. 32 cm N'B. Votre prix 
sera le mien Tel : (88) 86 64 
11 NDG Deux francs? 

VENDS Laser 200 + Extension 
16 Ko + Logiciels (Pac-Man, 
Key Hunter, Invasion. ) + 60 
programmes (jeux, utilitaires....) 
+ Livres et revues : 1500 francs 
a debattre Tel (32) 39 28 03 
Eric SAFAR, 5 rue du Pre- 
Feray, 27930 EVREUX 

VENDS console de jeu Video- 
pac G7000 (Philips) avec 18 K7 
de jeux, donl une de program- 
mation Prix oe lensemble 
9000 FB ou 1300 FF Patrick 
TASSET, 14 rue de la Vallee, 
4498 BASSENGE, BELGIQUE 
Tel ; 041 86 24 45. 




MESSAGES PERSO 



Papa. i'ai pas paye ma note de 
telephone, je peux appeler en 
PCV? Gerard C. 

Je profile de mon passage dans 
I'hebdo pour faire un bisou a 
mon pdpa et a ma moman. Mi- 
chael T 

Salope ! Arrete de lire et va 
m'acheter a bouffer. Michel D 

H6. July ' Quand est-ce que tu 
m'appelles ? Benoite P. 

Dis done. Bertrand, si tu prefe- 
res ta canne a peche a ton Oric, 
e'est parce que tu peux te la 
mettre plus facilement ou je 
pense ? Boris T. 

Papillon nocturne cherche fteur 
epanouie pour en recueillir le 
pollen. Bombyx. 



gAC'EST 

DU SERIEUX ! 
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DIVORCK 
A HOLLYWOOD 

de Charles SHYER 




Avec Ryan O'NEAL (berk 
berk ! berk !), Shelley LONG 
(bof f bof ! bof !) et Drew 
BARRYMORE (ouais...). 

1H53. USA. 11/20. 



Ca commence avec un mec 
detrempe sur le bord d'une 
route qui ressemble Ires eton- 
nammenl au Spielberg des 
debuts : barbe blonde et raide, 
petites lunettes d'ecailles et 
conversation emaillee (pavee 
memel de references a des 
films que personne n'a 
L'histoire n'est pas si nuile que 
pa : un couple dont les parte- 
naires sont alternativement au 
sommet de la gloire ou dans la 
deconliture la plus crasse, et 
dans cette tourmente oublienl 
totalement de soccuper de la 
gosse qui attaque ses parents 
en justice pour "non-assis- 
tance-a-mineure-en-danger-de- 
devenir-une-dangeureuse-ma- 
daptee-sociale, style-droguee 
ou-autre delinquante-de-cet- 
acabit". Bref, le genre de true 
qui ne pourrait arriver qu'aux 
States 

Done, a priori, on a un scena- 
no de melo qui lient la route 
Mais les acteurs ? Mais la 
mise en scene ? En effet. la. i 
y a matiere a reflexion. 
Ryan O'Neal est plat, trouver 
de la finesse dans son |eu. 
e'est comme chercher une 
bouteille de whisky a 4 plom 
bes du mat' ! C'est dire ! 
Shelley Long, pour son pre- 
mier grand role, est pas mal. 
mais elle n'a pas la carrure 
suffisante pour relever le ni- 
veau du jeu de son collegue 
Sinon. eh ben. on s'ennuie 
assez dur, car le moms qu'on 
puisse dire c'est que c'est ires 
lent, bonjour le montage a re- 
voir. 

La seule chose que Ion peut 
regretter c'est que I'on ne voit 
pas suffisamment la petite 
Drew Barn/more, qui a tout ce 
qu'il faut pour devenir une des 
grandes actrices du 21 erne 
siecle (elle a 8 ans \). 
Voila.. Encore un film dont vous 
pouvez vous passer. 
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MICKI IT MAUDE 

de Blake Edwards. 




Avec Dudley Moore, Amy Ir- 
ving, Ann Reinklng, Richard 
Mulligan. Georges Gaynes. 
1h5S. USA. 12/20. 



Mane depuis sepl ans avec la 
meme temme (un record en 
Californie), un journaliste de 
tele ringard aimerait paterner, 
las, Maude, qui vient d'etre 
nommee juge au Tribunal de 
Grande Instance, repousse ad 
vitam elernam le projet. II de- 
sespere d'etre pere lorsqu'une 
partenaire occasionnelle, Micki. 
lui annonce sa grossesse Alle- 
luia ! Patatras. Maude renonce 
a sa carriere et programme 
elle aussi une gestation, 
Blake Edwards, c'est la sene 
des Pantheres Roses. Victor 
Victoria, la Party, bref des 
comedies alertes au comique 
devastateur Horreur, malheur. 
ce film est poussif et sirupeux. 
Parfume a leau de rose, les 
dialogues sont affiigeants el 
Dudley Moore ne croil pas un 
mot des absurdii.es qu'il doit 
debiter C'est alors que la lu- 
miere vient. Blake a fait deux 
flops successifs et ii a Ires du- 
rement attaque la faune Holly- 
woodienne (S.OB), en conse- 
quence il prosttlue son talent 
pour se (aire pardonner. T'as 
pas mteret a recommencer, 
son of a bitch. 



edito 



Salut les aminches ( 
Quoi de neuf par cnez vous ? 
Tout va comme vous voulez ? 
Les enfants, les betes la 
femme 9 

Bon, du mien, bhof ! A part un 
petit festival dans le sud. a 
Cannes, je crois bien... 
Et qu'y trouve-t-on de bien 
cette annee ? 

En ce qui concerne la selec- 
lion francaise. 3 films qui se- 
ront tous sortis au 15 mai : 
Poulet au Vinaigre (C.Chabrol), 
Rendez-Vous (A.Techine) et 
Detective (J.L.Godard). C'est a 
dire, du prestigieux, du connu. 
Je ne sals pas ce qu'ils valent 
tous, car je n'ai vu que le pre- 
mier, done, faudra attendre 
avant que mes ires destructri- 
ces ne s'eveillent ! 



De mon cote, cette semaine, 
rien de particulierement palpi- 
tant un film ngolo et bien fa- 
gote, Le Retour Des Morts-Vi- 
vanls. et un autre quest pas 
mal. mais sans plus : Split 
Image Pas de quoi casser des 
bnques en sautant au plafond. 
De loutes manieres, ces mani- 
festations exuberantes de joie 
et de satisfaction soni forte- 
ment deconseillees par le Mi- 
nistere de la Same qui invo- 
que, pour ce faire, le caractere 
eminemmenl dangeureux de 
casser des bnques en sautani 
au plafond On a pu observer 
des troubles memaux chez 
certains fans d< :mema qui 
sautaien! au olafond denlhmi 

siasme 

Mais !ailes-le taire, quel- 
qu'un Plize ! 

CLOU, le bavard- 




Tdox office 

APRES LA REPETITION 

BRAZIL 

PERIL EN LA DEMEURE 

LA VIE DE FAMILLE 

LA MAISON ET LE MONDE 

AU-DELA DES MURS 

BLANCHE ET MARIE 

SUBWAY 

NUIT PORTE JARRETELLES 

LA BALADE INOUBLIABLE 

ADIEU BONAPARTE 

PIANOFORTE 

REPO MAN 

RETOUR MORTS-VIVANTS 

SAC DE NOEUDS 

LES SAISONS DU COEUR 

ELECTRIC DREAMS 

FASTER PUSSYCAT 

LA DECHIRURE 

LOUISE LINSOUMISE 

2010 

POULET AU VINAIGRE 

LES SPECIALISTES 

MOJADO POWER 

LE JEU DU FAUCON 

FLIC DE BEVERLY HILLS 

THE BOSTONIANS 

LA ROUTE DES INDES 




LI PACTOLE 

de Jean-Pierre Mocky 







Avec Richard BOMRINGER 
(True West). Pauline LA- 
FONT (la flfille). Patrick SE- 
BASTIEN. Marie LAFORET, 
Roland BLANCHE (True 
West) et Bernadette LAFONT 
(ta maman). 1H35. FRA. 



Jean-Pierre MOCKY est soil- 
disan! le realisateur maudit du 
cinema Irancais. Pourquoi 
pas ? Moi j'aurais plutot dit 
Raul Ruiz (don! j'va bientot 
vous causer) m'enlin a chacun 
son avis 

Faul dire que "maudit" esl 
quand meme un adjectif traf- 
tre . ou bien ca sigmfie que 



c'est un realisateur genial a qui 
on a |amais donne une verita- 
ble occasion de demontrer son 
savoir-faire, ou bien ga peut 
vouloir dire que c'est un mec 
qui a une vision du cinema lel- 
lement tordue qu'on ne lui die 
que raremenl un budget 
Apres avoir vu Le Pactole. je 
pencherais Ires nettement pour 
la deuxieme version, a moins 
que je sois incurablemenl cre- 
tin, et que |e n'aie rien compris 
a la protondeur de tart mo- 
ckyien, le contraire n'etanl pas 
prouve. sauf que lui decroche 
des budgets a la pelie 
J'ai Irouve ce film debile Je 
sais, d'aucuns pretendenl que 
c'est le retour du grand Mocky. 
et que c'est geniaaaal, mais 
moi pas. 

Nallez pas croire que les 
comediens soient mauvais. 
non, mais disons qu'ils ont un 
jeu pour le moms curieux. Ce 
jeu est indubitabiement impose 
par Mocky, je crois connailre 
relalivement bien le jeu de 
Bohnnger (par exemple). a tra- 
vers moult films el pieces de 
theatre, eh ben la. j lai pas re- 
connu. 



Les acleurs louent tous sur le 
meme ton et toul sur le meme 
ton : lis sonl a la limite danon- 
ner leur texte. entre I ilalienne 
et la piece de ihealre radio- 
phonique (Une itaiienne esl 
une leclure dune piece de 
theatre sans y mettre tous les 
sentiments) 

Dans un film c'est Ires eprou- 
vant. ce n'est meme pas ihea- 
tral C'est sur que le style de 
Mocky est original, ca on ne 
peut pas lui enlever 
Comme quoi le |eu des acteurs 
est primordial dans un film, 
c'esl C,a qui permet a un film 
de ne jamais etre vraiment nul. 
c'esl le grand avantage des 
(ilms ricains qu'on regoit en 
France, lis sont souvent creux, 
mais tres rarement mal joues 
Ainsi Subway est un film sans 
scenario, mais qui esl inter- 
prete avec un tel brio qu'on en 
oublie l'histoire au profit des 
acteurs 

Je passerai sur le montage 
irop lent a mon gout, c'est un 
lilm "noif" apres toul. 
Dernier true : les costumes onl 
ete fournis par Tati. le film 

aussi. 



LE RETOUR DES MORTS-VIVANTS 

de Dan O'Bannon 




Avec Clu CULAGER (non. 
non, c'est pas moi !), Don 
CALFA, James CAREN et 
Tom MATHEWS. 1H50. USA. 



Dan OBannon c'esl pas nim- 
porte qui , c'etait le scenarisle 
d'Alien el de Dark Star Ca 
vous place un homme. non "> 
Done voila : 

- Bonjour, je roule des mecani- 
ques, filez-moi de la Ihune que 
je vous ponde un film ou que 
je serai non seulement scena- 
nste. mais aussi reahsaleur, 
non mais. faul pas voir a voir 
non plus ' 

- Ouh laaaa ' Du calme gros 
C'est pas comme ga que ga se 
passe d'habitude. On narrive 
pas comme ga la gueule enfa- 
nnee pour demander un bud- 
get. 

Faul avoir une histoire 

- Mais chTai deia ecnle ' 

- Aaah bon ! Mais fallait le dire 
Faites-moi voir ga, un peu. 
qu'on ngole 



- Ah ben ouais. c'esl pas mal 
Pt el' meme qu'on arnverail a 
faire de la thune avec ga. Mais 
dites-moi. realiser. c est bien 
|oli mais vous avez fait autre 
chose avant ? 

- Euuuuh. ben. non. Mais j'ai 
deja tail le stcryboard. comme 
ga vous aurez une idee de ce 



que ga pourrait donner ... 
(Parenthese pour vous expli- 
quer ce quest un storyboard 
Petition, le mec qui dessine les 
aventures de Jack Palmer di- 
sail que I'avantage de la BD 
suf le cinema, c'esl qu'on peul 
s'amuser a detruire la Tour Eif- 
fel sans depenser un rond. si 
ce nest le crayon et la 
gomme, Un storyboard c'esl 
ga une BD du film avant que 
celui-ci soil tourne. on econo- 
mise ainsi et du lemps el de 
largent. Par exemple, Manara 
a tail le sloryboard du Declic 
ce qui lui permeltait davoir In- 
directement son moi a dire sur 
la mise en scene ) 

- Tres bien Faites voir... Evi- 
demment... Ecoulez. je veux 
bien vous donner le Iric, si 
vous me garanlissez que le 
film ressemblera de tres pres a 
ce Storyboard. OK ? 

- Ca marche ! 

Et voila comment notre ami 
OBannon se retrouva avec 
plusieurs millions de dollars 
pour taire son film 
Le Retour Des Morts-Vivants 
ga vous rappelle quelque 
chose, non ? Un film de 
George Romero, par hasard ? 
Qui date de '69 et qui s'appe- 
lart La Nuit Des Morts-Vi- 
vanls 9 Gagne ! 
Mais arlendez, ce n'est pas 
parce que les titres se ressem- 
blent qu'il existe un rapport 
enlre les deux, si ? Si ' 
Eh oui. disons meme que le 
rapport enlre les deux films est 
carrement essentiel. puisque 
celui-ci fail directemenl et ou- 
vertemenl reference au pre- 
mier, he, he I 

Faut que je vous raconle un 
peu Ihtstoire. 

On est en 84 dans le Kentu- 
cky Un jeune mec qui bosse 
dans un entrepol de lourmlu- 
res pour laboratoires et facs de 
medecme (cadavres en gros. 
squeleltes indiens. demi- 
chtens. papillons punaises et 
autres acides chlorydnques ou 
non), apprend par son chef 
preuves a lappui que La Nun 



Des Morts-Vivants est en fail 
tire dun fait reel Les preuves 
en question sonl dans la cave : 
4 barils de I'armee. arrives la 
par erreur. qui contienneni des 
cadavres qui se reanimerent 
en '69 !M Ms descendent tous 
les deux pour voir qa. et le 
chef, pour bien prouver que 
c'est du solide. file un grand 
coup de latle dans un des futs, 
Erreur latale (je dis bien fa- 
tale), v la-t-y pas qu'il en sort 
un nuage de fumee qui as- 
some nos deux degourdis. el 
en remontant a lelage ils se 
rendent compte que les divers 
cadavres. humains ou non. de 
lentrepot saniment. les 
boules ! 

La suite, j'vous la raconle pas, 
ce s rail pas du jeu ! 
Attention, ce film ne fail pas 
peur. pas meme un pelil peu. 
en lait c'est super drole. D'ail- 
leurs si ga foulait les ch tons, 
vous m'connaissez. (cf le nu- 
mero 73), ch'rais sorti en cou- 
rant ! 

C'esl drole pour plusieurs rai- 
sons : 

- Les morts-vivanls parlent ! 
(Brains I Fresh brains I ou en 
frangais ; cerveaux. frais cer- 
veaux, a ne pas confondre 
avec maison. sucree marson) 

- Quand on leur tire une balle 
dans la lete, ils ne meurent 
pas. comme dans le film de 
Romero. Entendre les heros se 
plamdre que dans le film ga 
marchail, et qu lis se sont fait 
arnaquer parce que ga marche 
pas. ga vaul son pesanl de ca- 
cahouetes 

- Les punks ont des elats 
dames et posent des ques- 
tions hautement existentialis- 
ts, du genre, mais a quoi ga 
sen les chaines que |e porte ? 
Toul ga c est pour me donner 
un genre, je ne recherche que 
lamour, Enfm vous voyez le 
style, on dirail le texte dune 
chanson de Johnny ! 

Et a la tin, et puis non. j'vous 
parle pas de la fin. 
Aiiez le voir el me faites pas 
chier ! 



LIBFRTE, 

EGALITE, 

CHOUCROUTE 

de Jean Yanne 




Avec M.SERRAULT, 

J.POIRET, D.PREVOST, 

J.YANNE, M.COUTEUER, 
U.ANDRESS, C.ALRIC. 

C.CLAVIER, P.PREBOIST, 
D.COWL, O.DeKERSAUZON 
et plein d'autres mecs qu'ont 
vu de la fumiere et qui sont 
rentres, comme ca, un peu 
par hasard I 2H00. FRA. 
11/20. 



Bon, ga va, je sais. la photo 
n'est pas autrement represen- 
tative du film : Jean Yanne au 
telephone... C'aurait aussi bien 
pu etre une photo prise a son 
bureau, qu autre chose. En 
fail. I'aurai du vous prendre 
une photo de Mimi Coutelier, 
parce que c'est une aclrice 
qu'est tenement pas bonne 
que les seuls films quelle 
tourne sont ceux realises par 
son mec, rusee ! 
Mais, dun aulre cote, elle est 
pas si mal la photo. Non, 
j'veux pas dire au niveau de sa 
qualile artistique. parce que la 
franchement. y'a pas de quoi 
grimper aux rideaux. Nan. 
c'que j'essaie de dire c'esl que 
Jean Yanne y ressemble elon- 
namment a notre venere pa- 
tron, seul vrai maitre de la reli- 
gion (ou de la secle au choix) 
hebdogicelienne. 

nomme Bwana Patron Chef 

Ceccaldi ! 
Et n'allez pas croire que celle 
comparaison soil fortuile, non 
mais, ho. faudrait pas pousser 
quand meme ! En effet. Jean 
Yanne joue le role de Maral. 
directeur du quolidien "L'Ami 
du Peuple Ciel", encore plus 
despotique que notre patron a 
nous, lellemenl qu'une certaine 
Charlotte Corday essaie de lui 
enfiler son sunn dans la 
panse, c'est dire ' Alors que 
nous, on en esl a peine a lui 
enfiler des mousses dans la 
panse ! (Avis aux porteurs du 
badge "touche pas a mon 
pole, louche a mes couilles" 
en arabe marocain, "mouss" ga 
veul dire "couleau". vous 
voyez un peu comment que 
j'vous donne des tas de ren- 
seignements. que comme ga 
vous allez etre hach'rneni plus 
cultures ?). 
Si vous voulez que |e vous 
parte du lilm, je vous repondrai 
ceci : mais quel film ? Une 
bouillie, un minestrone, un 
patchwork, du fric foutu en 
lair, d'accord ! Mais, un film 
Ca non ' Certainement pas I 
Faut pas croire quen mellant 
des las d'acleurs sur de la pel 
loche ga fait un film ' Ni non 
plus parce qu'il y a 8 minules 
drdles a L 

On esl pas des boeufs. lout de 



SPLIT IIYlAC.t, 
L'ENVOUTEMENT 

de Ted KOTCHEFF 




Avec Michael O'KEEFE. 
Karen ALLEN (Les Aventu- 
riers De L'Arche Perdue), 
James WOOD (a suivre) et 
Peter FONDA (genial). 1H4S. 
USA. 1982. 13 20. 



Ted KotcheH est un realisateur 
curieux parce qua chaque film 
il change de style el de genre 
Rambo, film d'action. Un Colt 
Pour Une Corde, western et 
enfin Split Image, drame psy- 
chologique. tourne juste apres 
Rambo, d'ailleurs. 
Vous remarquez que le film 
date de '82 et qu'il nest distri 
bu6 que maintenant ei 
France : il aura fallu plus de 
2 ans pour que ce film trouve 
un acheteur, c'esl finalement 
un petit dislributeur qui a jete 
son devolu sur le film. 
Un jeune athlete se laisse em- 
barquer dans une secte tout ce 
qu'il y a de plus classique. II 
est au debut reticent a cette 
ambiance particuliere (on 
s'aime tous, pisse and love 
petit frere. on ne bouffe que ce 
que Ton produit de vegetal), 
puis se laisse prendre au jeu 
apres une tentative d'evasion 
It n'ob^it plus qu'au grand chef 
de la secle : Peter Fonda Ses 
parents ne sont pas du tout 
d'accord avec cette idee et se 
payent (cher) un kamikaze 
(James Wood) charge de de- 
programmer le (ils. 
Ce n'est pas le premier film 
auon nous sert sur les sectes 
et leurs metaits. Celui-ci a 
I'avantage de prendre 
contre-pied de pas mal des 
stereotypes du genre : le jeune 
athlete n'est pas du lout une 
ame en peine, delinquent ei 
tout le tralala. au contraire tout 
va bien pour lui, ses parents 
ont de la thune et c'est un tres 
bon athlete. En plus de ga, il 
ne se rend pas au village de la 
secte a la recherche de quel 
que ideal pseudo-hippie de vie 
en communaute, non, non, 
non : son true c'est qu'il a 
envie de rester pres d'une 
gonzesse dont il est lombe 
amoureux. simple et compre- 
hensible. 

Evidemment, il se laisse pren- 
dre au jeu au bout dun certain 
moment, il est sur qu'etant 
dans un environnement ou toul 
le monde est gentil (en appa- 
rence) et ou on se d^charge 
de tous les problemes quoti- 
diens, on peut se laisser ten 
ter, en particutier lorsque le 
"patron" a un charisme irresisii 
ble. 

Deconnez pas, la secte ces! 
pas tout rose non plus : pas le 
droit de baiser, pas le droit 
d'etre conlre quelque chose, 
pas le droit, pas le droit, pas le 
droit, juste le droit de fermer 
gueule et de faire ce qu'on te 
dit de (aire sous peine d'ecchy- 
moses. 

Encore faut-tl dire que la secte 
du film m'a I'air bien soft par 
rapport a ce qu'on rapporte sur 
les vraies sectes, ils m'ont lair 
vraiment Irop genlils. meme 
c'est que de la fnme. 
Autre originalile du film, la fin 
(pas le denouement) ; le heros. 
apres avoir ete deprogramme, 
ne rejette pas en bloc tout ce 
que la secte representait. il es- 
saie aulant que possible den 
conserver des elements posi 
tifs : Vamour. le fictif des 
autres, et le reel de la gon 
zesse apres laquelle it courait. 
II y a une chose qui me gene 
cependant lors de la depro 
grammation, jamais nest de- 
noncee la methode employee, 
forte, eprouvante, tout a fail 
semblable a la programmaiion. 
ni les motivations du depro 
qrammeur. c'esl dommage. 
Fteste un film pas mal. mais 
qui ne va pas au fond du pro 
b'eme. 



teloche 



EDITO 



L'ete est la. si s< j en ai la 
preuve Demeniani la meteo et 
le calendner. la television fian- 
caise vient de commencer ses 
programmes estivaux (com- 
prendre diffuser les emissions 
les plus nngardes) 
L'armistice de Cannes a 
permis de conslater letendue 
des degats televisuels. Ces 
dernieres semaines, on affi- 
chait complet au niveau de la 
qualite des films pour cause de 



Bondages d'ecoute. Quand 
vient I'heure des fonds de !i- 
roifs. le resultat esl affligeant 
Exceple un Hitchkock mullidif- 
fuse (TF 1) c'est le neanl cole 
films Encore une bonne note a 
TF 1 pour la serie histonque 
sur Ian mil, mais c'est A2 qui 
domine de la tete et des epau- 
les avec une sene. un telefilm 
un magazine «t un document 
inclassable. 

BOMBYX 




v vS^V VERSI0N LfiTINE — ^Z&k 

et la vie continue* 




Serie italienne de Dino RJsi 
avec Virna Lisi, Jean-Pierre 
Marielle. Clio Goldsmith, 
Sylva Koscina et Philippe 
Leroy. 

Je prends le train en route, 
mais c'est pas grave parce 
qu'il y a hurt episodes qui vont 
nous conduire a travers I'ltalie 
(la Lombardie. Milan. Rome), 
la Suisse, la France (Pans, la 
Cote dAzur) Ce penple touris- 
tique sert de toile de fond aux 
aventures de la famille Betlo- 
chi et de leurs collateraux de 
1945 a nos Jours. C'est une 
bonne serie avec un scenario 
honnele: pour une fois les per- 
sonnages ne ressemblent pas 
a des caricatures (Dallas ou 
Dinasty) et le dialogue nest 
pas qu'un ramassis de poncifs 
(Chateauvallon). Quoi d'autre 7 
Le casting est excellent. Clio 
Goldsmith irradie chaque epi- 
sode de sa pulpeuse acade- 
rnie, ne la manquez pas 

Resume du premier episode : 
dans une grande maison a 
Brianza. Giulia (Virna Lisi) a 
vecu les annees de guerre 
avec son pere Edouard (Tino 
Scotti). un vieillard despolique, 
sa soeur Evelina, timide et ro- 
mantique. et deux de ses plus 
jeunes enlante ! Aldo et Silvia 
(Clio Goldsmith), belle et intelli- 
gent Peu a peu la famille se 
reconstitue. Revient Elio. le fils 
qui etait dans la resistance. Ar- 
naldo (Jean-Pierre Marielle). le 



man de Giulia. qui etait refugie 
en Suisse lors de la Repubh- 
que de Salo. Saviero (Cittono 
Mezzogiorno). le fils aine en- 
gage dans larmee. et Arturo. 
un autre fils. prisnnnier en Afri 
que 




Les retrouvailles entie Giulia et 
Arnaldo manquent de chaleur, 
le docteur Fasoli (Philippe 
Leroy) ayant pris la place du 
mari absent. Arnaldo se consa- 
cre a I'entreprise familiale. une 
vieille papclerie, mais Saviero, 
ambitieux et sans scrupule lui 
enleve le contrdle de lusme. 
PBndant ce lemps, Silvia 
tombe amoureuse d'Antonro. 
un journalisle de Milan. Ouf ! 

Tous les dimanches a 19h00. 




i ecrits vams et piques p 

le deuxieme couteau ^ 



Telefilm de Josee Dayan 
avec Francois Marthouret, 
Alexandra Stewart, Michel 
Constantin, Helene Vincent 
et Patrick Bouchitey. 
Sandra Gamelin. auteur dun 
best-seller, est assassinee lors 
dun dejeuner a la Closerie des 
Lilas [fast-food parigol ou le 
Tout-Paris litteraire se goinfre 
de ragots) Elle avail rendez- 
vous avec Jerome Bernotte, 
conseiller litteraire des editions 
Cooper, a qui elle devail pro- 
poser son nouveau roman 
(Meme Louise contre le gang 
des pluches). Quelques jours 
plus lard, on retrouve le corps 
de lediteur Gaston Cooper au 
bois de Boulogne 




Le monde litteraire est en emoi 
(el moi. et moi ) apres ces 
deux crimes. Le commissaire 
Bartillot el le journaliste Yvan 
Brique (a I'oeuf) menent cha- 
cun leur enquele. Alors que 
Bartillot travaille au corps Mi- 
chele Tessier. celle qui a pu- 
blie le precedeni ouvrage de 
S. Gamelin. Yvan Brique (la 
goeleite) cherche du cote des 
auieurs rales. 

Excellenle adaptation dun bon 
polar Le portrait du milieu litte- 
raire esl devastates a souhaii 
Les personnages cruels. mes- 
quins et solitaires vont jus- 
qu'au bout de leurs passions 
et de leur desespoir La mise 
en image est tres sophistiquee. 
les couleurs glacees, les 
angles de prise de vue origi- 
naux Avec en prime un hu- 
mour un peu distancie. Une 
seule fausse note : qui a ecrit 
le 3eme roman ? 
Diffusion le 22 sur A2 a 
20h?o 



cur iositds 



MOI...JE 



Magazine realise par Bernard 
Bouthier. 

A boire et a manger comme 
d habitude Oeux bons suiets 
mal traites : SAUVE QUI PEUT 
sur la solidante el BANCO A 
LEST sur les capitalisles mar- 
xistes. Un classique SUPER 
DEMERDS et deux merveilles 
LE GUEULOIR et MADAME 
EST SERVIE. 

LE GUEULOIR :une minute 



pour cracher toul ce qu'on a 
sur le coeur. La colere. la 
haine. le desespoir a letat 
brut Au programme un immr- 
gre. un palron. un coursier. 
une prostiluee. un anti-calho. 
un pretre inlegnsle Souvent 
drole. louiours poignanl 

MADAME EST SERVIE :le 

"personnel de maison' en a 
gros sur la palate Dongme 
humble, ils sont confrontes a 
lopulence des nantis. a leurs 
exigences croissantes lau 






Lundi 20 mai 


20H30 C- 


LES MOTS POUR LE DIRE ttlippanl) 


20h35 FR3 


LES TONTONS FUNGUEURS He dialo- 




gue qui luel 


20H35 TF1 


QUAND PASSENT LES CIOOCNES 




(tilm russe sur le relour des colombes de 




la paix) 


20h35 A2 


LE GRAND ECHIOUIER : Alexis Weis- 




senberg 


22h20 TF1 


ETOILES ET TOILES /Freddy en post- 




Cannesl 


23H00 FR3 


THALASSA la labordagel 


Mardi 21 mai 


20h00 C- 


COUPE DE FRANCE : Lille Sl-Enenne 


20h35 FR3 


LA DERNIERE SEANCErRobed Milchum 


20h35 TF1 


LE COMMISSAIRE MOULIN :La bavure 


20h35 A2 


LA PUCE ET LE PRIVE avec Bruno 




Cremer et Charles Vanel 


21h50 C+ 


HISTOIRE A LA UNE :Yasser Aralal 


22h05 TF1 


LES TROIS JOURS DU CONDOR 


22h30 A2 


LIRE C'EST VIVRE : Les nwls chaudes 




du Cap Francais 


22h30 TF1 


TINTAMARTS (vanetesl 


Mercredi 22 mai 


20h30 TF1 


DALLAS 


20h35 FR3 


CADENCE 3 


20h35 A2 


LE DEUXIEME COUTEAU Ivoir ariSUtyM 
LEGITIME VIOLENCE tconnene a /ela- 
lagel 
PETROLE If 3 


21h00 C- 


21H30 TF1 


22hl0 A2 


MOI...JE Ivoir CURIOSITES) 


22H25 FR3 


LE PANTIN IMMOBILE (manip toiree) 


22h25 TF1 


COTE D AMOUR ILa bourse qui rockel 


22H35 C- 


NOTRE HISTOIRE (voir CURIOSITES 




821 


Jeu 


di 23 mai 


20h30 C- 


ERENDIRA Ivoir CURIOSITES) 


20M35 FR3 


LA PERLE DE LA COURONNE lepo- 




pee des mineurs silesiens) 


20h35 TF1 


LES MISERABLES trln) 


20h35 A2 


ARRIVA SABATA (western spaghetti! 


21h30 TF1 


QUESTIONS A DOMICILE :M Rocard 


21hS5 A2 


DECAUX : CLEMENCEAU 


22h20 O 


SCUM 


Vendredi 24 mai 


20h35 A2 


CHATEAUVALLON 


20h35 FR3 


AGATHA CHRISTIE: La mort a domi- 
cile 
LA GRANDE SUITE (vaneles) 


20h35 TF1 


21h35 A2 


APOSTROPHES : Les joumalistes 


21h35 FR3 


FACE A LA TROIS : Jacques Chirac 


21h45 TF1 


MULTIFOOT 


22h20 C- 


MISSISSIPI BLUES (1984), documen- 




taire de R. Parrish et B Tauermer 


23h00 A2 


AFRIQUE SUR SEINE de Jean Rouch 




(1968) 


Samedi 25 mai 


20h35 TF1 


PAS DE VIEUX OS (sene noire vieux 




leu) 


20h35 A2 


FINALE CHAMPIONNAT DE FRANCE 




DE RUGBY 


20H35 FR3 


DISNEY CHANNEL 


22M0 TF1 


DROIT DE REPONSE 


22hl5 A2 


LES ENFANTS DU ROCK 


22H15 FR3 


DYNASTIE 


22h50 C- 


MAUSOLEUM (1981). lenlin un bon Mm 




tantastiQuel 


Dimanche 26 mai 


18h00 C- 


LE CADEAU Ivoir CURIOSITES! 


19h00 A2 


ET LA VIE CONTINUE If 3 fvoil aincleQ 


20h35 FR3 


LAISSEZ PASSER LA CHANSON 


20h35 A2 


LE GRAND RAID 


20h35 TF1 


LA MAIN AU COLLET Ivoir article^ 


21h00 C- 


GORKY PARK (mauvais mais avec Lee 




Marvin el William Hurl} ~b 
ITS ALL TRUE (voir amclelhl 


21h35 A2 


22h30 FR3 


AN AMERICAIN ROMANCE (document 




sur la siderurgiel 



beurre) Tranches de vies 
(pain) bis Reportage mcisif et 
caustique sur ceux qui passent 
lencauslique 



teloche 






A CHAT PERCHE ^ au collet 
la main au collet^ 



Film de Alfred Hitchcock 
(1956) avec Cary Grant. 
Grace Kelly et Charles Vanel. 

Sur la Cole d'Azur, en pleine 
saison tounslique. un rat d'ho- 
tel nocturne vole des biioux. La 
police soupconne John Robie 
(Cary Grant), alias Le Chat. 
cambnoleur celebre avanl- 
guerre Ce dernier miaule son 
innocence (la nuil tous les 
chats son! gris). puis pris a re- 
brousse-poil. decide de coincer 
ce malou. Apres avoir de- 
mande de I'aide a des anciens 
copains. apparemment ranges, 
lex-felm pose sa patte sur un 
minou en chaleur, Frances 
(Grace Kelly). II dine avec elle 
(repas leche-babines pour 
mmet collet monte), fail patle 
de velours avec sa mere et 
finit dans la laniere (au Carl- 
ton : paniere " * * ' ) ou. ron- 
ronnant de plaisir. la minelte 
lui montre une parure chat- 
oyante John se poste en em- 
buscade afin de griffer le misti- 
gri qui ne manque pas de 
venir. Las, le matois matou 
reussil a s'emparer du collier, 
puis a senfuir au ras des 
moustaches de John, Chat 
alors ! 



C'est le dernier film de Grace 
Kelly qui. prenanl gout aux bi- 
joux, decida de troquer les 
faux pour des vrais Le lour- 
nage tut relativement dangeu- 
reux. les scenes sur les toits 
etant peu doublees. De plus. 




Vous prendrez bien une Ian- 
gue de chat ? 

Grace Kelly etant tres myope, 
le tournage de la sequence ou, 
lancee a pleine vilesse, elle 
s'arrete au dernier moment au 
bord de la corniche. causa de 
nombreuses frayeurs Retros- 
peclivement. sa sortie de 
scene definitive est cinephili- 
que. 

Diffusion le 26 a 20h30 sur 
TF1 



Emission de Julian Temple secours calhodique esl la pour 

(BBC) avec des apparitions vous aider (bon celail dans Vi- 

d'Orson Welles, Mel Brooks, deodrome. le film D. Cronen- 

Grace Jones, Marl Wilson et berg, mats c aurait pu etre 

Akio Morlta (Pdg de Sony). dans ce bazar medialique) 



Mr A. vieux grincheux et Mme 
B, retraitee aigrie. sont enfer- 
mes dans des postes de televi- 
sion au travers desquels ils ob- 
served le monde Ils se voienl, 
se parlent el se disputent au 
sujet du programme a regarder 
sur le mur d images, place de- 
vant eux, leur seule vision de 
lexterieur Ils passent de I'An- 
gleterre a I'Urss. au Japon. a 
llnde. 

La video est partout dans la 
vie (pour Mr A et Mr B elle esl 
la vie)- On se marie par video, 
on fornique par cable (scene 
de la video conjugale). on 
samuse avec le video-|eu 
Herpes (parcours du con-bat- 
tant a New- York) el on video- 
divorce (le gagnant garde les 
cassettes du couple) Vous 
voulez partir en vacances. pas 
de probleme. Si vous eles 
blemes branchez-vous sur les 
Seychelles el bronzez aux 
ecran-violets Vous eles accro 
et votre tele esl en panne, le 



Je passe sur la video-justice 
(temoins. aveux et jugements 
cathodiques) pour en venir au 
fin du fin : la vie apres la mort. 
Visite dun cimetiere de cele- 

bntes, Les etolos coni 6qm 
pees d'ecrans qui permettenl 
de revoir nos chers disparus. 
Tres chers meme puisque Mel 
Brooks exige X dollars a la mi- 
nute pour .tout dire sur le sens 
de la vie. Quel peut-il etre pour 
nos deux personnages dans 
leur bocal ? Demandez la re- 
ponse a votre poisson rouge. 
Le sujet de remission est vous 
laviez compris la video dans la 
vie. demain. Revu et corrige 
par un humour bntish a mi- 
chemin enlre le non-sens et 
les Monly Pythons (les bebe- 
tent qui moment au box-office), 
c'est Alice au pays des mer- 
veilles a lage etectronique Un 
regal pour les amateurs. 



Diffusion le 26 a 21h35 sur 



que ruines et cendres. Fu- 
neuse, Mamie Nova condamne 
petite fleur a rembourser avec 
son corps la maison Donl 
acle. la pauvre petite expose 
son academie sur la voie publi- 
que (version enfanline : elle 
fail de la pub pour de la creme 
fraiche; version adulte . elle fait 
la pule). Elle renconlre alors 
Ulysse. ex-grenouille et pre- 
sentement prince charmanl, 
quelle oblige a Irucider la 
mere-grand (vas-y Ithaque. 
Ithaque !l Ils vecureni heureux 
et eurenl beaucoup ce petits 
suisses 



LE CADEAU 



Diffusion le 22 a 22h10 sur 
A2. 



Film de Ruy Guerra (1983) 
avec Irene Papas.Michael 
Lonsdale et Rufus. 

Erendira (pettle fleur) une 
leune et belle orphelme vit 
chez sa grand-mere (Mamie 
Nova), qui lexploite au maxi- 
mum (et je te bals le beurre. et 
ie te fabrique le yaourt) Un 
soir epuisee elle oublie de 
souffler les bougies A I'aube. 
la sompiueuse villa nest plus 




Film de Michel Lang (1983) 
avec Clio Goldsmith, Pierre 
Mondy et Jacques Francois. 
Un cadre prend sa relraile. 
Ses collegues lui ofrent un ca- 
deau une rencontre avec Bar- 
bara, call-girl de luxe. II en 
tombe amoureux. son ex-pa- 
tron aussi. sa femme idem 
(slop, pas de ca dans une 
comedie legere, on retire 
lepouse) C'est vif. parfois 
drple La ou je suis plus d'ac- 
cord. c'esl I'horaire de la pro- 
grammatiofi A la meme heure, 
sur A2, passe la sene italienne 
avec la pulpeuse creature de 
mes reves Bande de sadi- 



" Je m appelle Mamie Nova et 

l 'cume la pub" 
Ce conte moral pour adultes 
ne ressemble a rien de connu 

C'est demesure. grandiose, ly- 
nque Si on n acceple pas le 
parti-pns baroque, ca devienl 
hermetique et ennuyeux. 

Diffusion le 23 a 20h30 sur C 




Diffusion le 26 a 18h00 sur C 




Personne n'a 
encore trouve ! 



Avoc 5 Jou* d'ave'iturea 
pM!tliiiiw>l» an franco la, 
avec nfreto SonoroB. plua 
"> Jon* d'nrcade, EUHtKA a 
'h* J A occupy Ins longues 
■mir^iirj d'hlvor de plus de 
Winn Tana. Avec an 
plun un cancoura el 
2S0U00 t r«m;n au 

prooior qui t , ,.,;. ■ 
cad,- d'OIADM.. voila hinn 
vouo rendra 

.'!■[■ ,.|A-, ! 

1'ornofnif it'nywiit trouue* la 

bonne rtpanao mi 11 Mm-i, 

olatura du 

< a <*tc 

prorog£ Jusqu'l li Tin da 

I'anneu. . 

■ ■■ 



[URTKA IMORtMTIQir W Hup Victor MuriiK*. 7MKI9 PARIS 

M 

Adresse 

Code Ville 

desire recevoir la cassette du jeu 
EUREKA pour : _ 

Commodore 64 I | Spectrum. | | 

Ci-joint 250 Francs en reglement de ma 
commande (Franco de port) 




HOURRA ! JE VOLE... 



Non, cest pas vrai. mais j'ai vu 
de mes yeux vu qu'il etait pos- 
sible de decoller et de se bala- 
der grace au simulateut de vol 
d' Ere Informatique . Mission 
Delta Quoi ? Mission Delta "> 
Mais il est antique ce soft ! 
Eh bien vous etes dedans • Le 
logiciel en question fonctionne 
maintenanl suf Amstrad ei 
comme je sais que vos aimez 
ca, sachez qu'il vous en cou- 
tera 1 60 francs (environ. ca 
change suivant les cremeriesl 
Bon vent et bon vol ! Sou- 
bliais : e'est, comme d'habitude 
maintenant, la meilleure ver- 
sion jamais realisee par les 
gens d'Ere. la preuve ils ont 
installe la stereo pour vous 
(aire mieux planer. 



PEPE I CH IS ( ONTRE II GANG DES HX'ES .' 




Suite de /a page 28 



Grosso modo, cest ce qui nous 
arrive, mais en pire Car une 
enorme vague deterle sur le 
pont et nous balaye- Je serre 
ma canne et je maccroche a 
mon beret. Le choc est violent 



Avant de couler a mon tour, j'es- 
?aye de crier. Manque de bol, il 
n'y a aucun navire a la ronde. Et 
meme s*il y en avail un. j ima- 
gine mal comment il pourrait 
nous tirer de la. Les Bahamas 
sonl a plusieurs centames de ki- 
lometres. Je n'entends plus les 
ens de Tramolo. 





■«H\V\\VMV^ N 



LE PMU MISE SUR LE 
BON CHEVAL 



Depuis que ce loulu canard (le 
noire) existe. j'ai vu passer des 
tonnes de programmes simu- 
lant le tierce, des tombereaux 
de )eux de hasard. des roulet- 
tes, des pokers el tutti frutti. 
Cest bien les gars, ca prouve 
que vous aimez les simulations 
de jeux de pognon sur ordina- 
leur. Sachez desormais quon 
vous a compris en haut lieu : 
le PMU a decide a son tour de 
s'intormatiser De quoi sagite- 
t-il et comment se fait-ce ? 
Simplement. avec larrivee du 
LotO Sportifffe jeu con fait par 
des cons pour des cons) il 
n etait que temps de redresser 
la barre du PMU (pan mutuel 
urbain et orbam) en jouanl la 
carte de Hnformatisation Par 
consequent, tous nos lecteurs 
de Mantes-la Jolie et des envi- 
rons pourront desormais taper 
leur tierce sur I'un des 210 ter- 
minaux places dans pres de 
140 troquets du coin. Les infos 
sont centraJisees sur un termi- 



nal regional et les calculs se 
font au triple galop Cest la 
moindre des choses Cette 
transformation du PMU esl un 
marche interessant pour I infor- 
matique puisqu il esl question 
de fabnquer pres de 8000 
modems et HOO0 termtnaux 




Les fabneants sont sur la ligne 
de depart On n attend plus 
que Zitrone pour le commen- 
taire. Bull et Matra sembient 
places a coup sur. Souhaitons 
que personne ne tourne casa- 
que. 



J'ai a peine le temps daperce- 
voir trois ailerons de requins 
fendre la mer en furie et se pre- 
cipiter vers Tramolo qui hurle 
"Je ne sais pas nager ". 
Surpns par le froid glacial de 
leau. Steve Jobard vient de 
couler a pic 

Le bateau se casse comme une 
coquille d'oeul. A mon tour, je 
sens que je vais flancher Ca 
mennuie tout de meme de cre- 
ver loin de chez moi et a I'abri 
des regards indiscrets car |e 
suis un tantinet exhibitionmste 
Je pensais avoir encore quel- 
ques belles annees de anl moi. 
mais je crois que je vais devoir 
renegocier le contrat en secon- 
des 



Enfin. alors que leau commence 
a envahir mes pauvres poumons 
fatigues, je ressens une vive 
douleur dans la poitnne : cest 
sur ! Je suis encore en train de 
faire un infarctus. Et j ai oublie 
mes pilules a Paris, dans la 
poche de mon veston a car- 
reaux. Jaurais du regarder mon 
horoscope avant d'entreprendre 
quoi que ce soit ce matin. 
Quand ca va mal. ca va mal... 

(Comment Pepe Louis. Steve 

Jobard et Jack Tramolo vont-ils 
S'en sortir ''^Comment ?? 

COMMENT ?? Argh ...Ne dor- 
mez pas pendant une semaine 
et campez devant votre kiosque 
a journaux !) 



PLATITUDE 



La grande mode est aux 
ecrans plats : tous ceux que 
j'ai vus sont merdiques. illisi- 
bles. gris. ternes. petits. 
moches, chianls. cacas.. .sauf 
celui du Gridcase, que cest 
qu'il est beau cet ordinateur de 
chez Grid ave son ecran plat 
vert et jaune. Meme qu'il existe 
un modele (GridcaseS) ave un 
ecran au PLASMA rouge et 
noir comme les globules 



Helas. quand c est bien c est 
cher, j'ose meme pas vous 
dire le prix pour vous eviter la 
syncope. Je suis bon. 



ME* OiUjufFS ™" 




MAIS QUE SONT LES DEULIGNES 
D'ANTAN DEVENUS ? 



Comme toute chose, cette rubnque sembie avoir eu urie 
belle existence : Elle naquit dans l indifference eiie gran- 
dit en taille et en qualite avec le temps et maintenant elle 
setioie. perdant ses fans semaine apres semaine. 



II est temps de reiterer lappel aux faineants de tous 
les ordinateurs : reveillez-vous et produisez. bon 
sang ! Vous croyez que les softs tombenl du ciel 
vous ? Mais bougez-vous ventre saint-gris, sinon je 
vous supprime tous. sans exception ! 



Premier dans la calegorie moms j'en tais, mieux |e 
me porte, Childeric AZUR vous souligne son point 
de vue. 

M Listing ORIC1. ATMOS 

1 P0KE46343,PEEK< 47089) 

o 

Bruno de la B01SSERIE recidive en beaute et en in- 
verse ! 



m Listing THOMSON 

1W CLEAR. 8.H6FFF FORI -=JiH7idWa I08.H? 
011 REfiDR*^P0KEI,VflL( "li.H"+H*.< NEXT 
■■ EXEC&H7000 

20 DRTfl lC-10.8E J 40-Ulil,Hb.a4,44,R 
R, 84 , R7 . 80 . 8C. 5F , 3F . 26, F4 . 3S* 



Grace a ce nouveau deuligne de Laurent C0NSTANTY. 
profile? de majuscules et minuscules simultanement 
sous le controle majuscule. 



P Listing COMMODORE 

3 F0RT-679T07 1 5 PEflDfl P0KET . fl NEXT DfiTft 1 69 
1.141- 25 -km- 162- 146. 160.21, 173. 18.20 

8. 16.4.162 

4 DBTfll, 166.23.142.18,208. 148,24, 208. 173. 
13. 228. 41 -1,24«, 3, 76. 49- 234, 76. 188,254 



| Listing CANON 



Pour partir en vacances avec Philippe CAUSSE. utilise? 
le chargeur du programme ZX ! Pour regfer la vitesse. 
pokez une valeur entre 01 et 255 en 16642 A lui les 
deux softs ! 



1 INPUT-C.N" ;C»,X:C-A5C IC») : FORA-2T023ST 
EP3I D(A^3)-UAL I "liH" *MID» I FONT* ( C I , A, 2) 1 

2 D<A¥3I -23S-D1AV3) : NEXT : FONT* I X I - ■ D I O t , 
Dill, D(2I,D(3>,D(4), D(3) ,D!6) . »I7) - 



Marcei et Patrick ne Oonnent nen d'autre que ce petil 
gag. meme pas leur nom I 

m Listing Apple 

1 FOR 1 = 1 TO ?: READ A: POKE 

2047 + I, A: NEXT : DATA 32,2 
37,253,173,48,192,76,00,08 

2 FOR I = 1 TO 1000: NEXT : CALL 

2048 



Pierre ADAM a du soullnr de malnutrition dans son en- 
fance Depuis. il ne reve que de gras 



M Listing ZX 81 














IB REM I 


L3S 


OCTETS) 








aa print 


USR 16514 








Codes Machine 
















16516 


n w 


Ok) 
IF 


8§ n 


06 


11' 


5F 
17 


16532 


r>7 


CD 


hh 


02 


fU 


Hr 


r ■ 


aa 


16548 


48 


fr 


n- 


y- 


37 


.1. 


ca 


4 


16548 


~-.H 


n« 


4 1 


4F 


B6 





CD 


ft 


16556 


.'-. 


fH 


11 h 


4H 


u 


1 ? 


BE 




16564 


im 




RF 


■■' 





I-. 


se 


SB 


16572 


M-, 


-- 


1 1 


DM 


4 1 


. 1 


'. 


18 


16583 


•- ,-■ 


!fi 


OF 


4 


16 


ea 


2 1 


IK 


165SS 


!|fl 


1 1 


^H 


00 


l „ 


2^ 


OF. 


40 


165S6 


' i 


10 


49 


.'J 


•H 


09 


11 


Ft 


166B4 


ir 


till 


ca 


il. 


IS 


B9 


1 1 


11 


16612 


F- 


SB 


Z9 


4 1 


n- 


00 


as 


Bh 


16620 


-.1 


iS 


,v- 


4 L 


L8 


hH 


bl' 


SB 


16625 


^^ 


40 


a i 


ai 


00 


L9 


01 


D6 


16636 


.'.-' 


H 


se 


C9 


01 


i'O 


Oh 


Oh 


16544 


1 o 


bl 


29 


hb 


L'd 















o 










Bon peut-etre a 


la prochame lois 


Sll 


1 en a une 





AMSTRAD 

LES LOGICIELS FRANQAIS 
SONT ARRIVES ! 




Commandes, renseignements 85/41.36.16 

€; COBRA SOFT idltt. auiii. pou\ Iti autwi micno-o\dJjia£iu\t iamiXiaux ! 

; Poui ttctvoiti tt caXatogut. : tnvoytz tmt uivttoppe. LUnbitt a t.10 Fit, poxtant uottt 

v> td\itit compttte a ; COBftA SOFT 5, av. Monnot 11100 CHALON S/SAONF. IPxic-Litz ta mat- 

*^L_ qui dt votiz ox.dAJiaX.tM.). 

'' Viog>iamn<tJuA.6 , contacXe.z-noui ! — 
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la page pedagogique 



la page pedago~ 



Le programme de Jean-Jacques BIC, se propose d'entrainer nos enfants a I'art subtil de la conjugaison 



Mode d'emploi : 

Ce programme conlienl 20 verbes des 3 groupes idom ies auxiltai- 
res avoir el etrel et oflre deux possibilites 
1 -Reviser Ies terminaisons des 10 pnncipaux temps 
2-Conjuguer chacun des 20 verbes a loutes Ies personnes de ces 
10 temps. La possibilite est donnee de situer et de cornger se- 
meme ies erreurs. en demandant un nouvel essai. ou de 'aire aft'- 
cner la con|ugaison correcte du verbe choisi. 



QmB W*$ 
Pufe&A&iBZ 

0(\t*$ C£T E$f>AC£ 
SVrfS <?"£ CBtfl 
«B W£ 



10 DIMVEffttJ 

20 Ff«' — -" 

30 POKE53290 1<; PQKE33201.12 

40 PRINT "IT* 

50 0OSUS229e PEM -- PRESENTATION -- 

60 PEM 

70 REM CHOIX DU PPOGPRMME -~ 

30 PEM 

se e«ai«"R£visiON des terminaisons 

100 Cf.2>-"EXEPCICE DE CONJiJ&RISON" 

110 C8<3>-"FIN DU PROGRAMME" 

120 r*Cl '-"PRESENT " 

130 Tf 2<-"FUTUR SIMPLE' 1 

140 Tf 3i«"IMPARFAIT 

150 Tf4>»"PASSE SIMPLE" 

160 T«C3>-"PASSE COMPOSE" 

170 TfC6>->"PLUS QUE PARFAIT" 

IBB Tf<7>»"CONDITI0NNEL PRESENT 

190 Tff8)-"FUTUR ANTERIEUR" 

200 Tt<9>-"PASSE ANTERIEUR" 

21B Tf<8)-"SUBJ0HCTIF PRESENT 

220 PRINT 

230 F0RJ-1T03 

240 PRINTTAB(4>, 

230 NEXT J 

260 OETCHf IFCH*< 

270 IFCH»«"3"THENPRINT"T 

280 IFCH»0 ,, r'RHDCH»C>"2 1 

290 G0SUB2 920 

310 FORJ-1TO10 

320 IFJ"lBTHENJ«0 

330 PRINTTAB<4>,J 

340 IFJ-0THEN360 

338 NEXT J 

360 GETXt IFXf-"" 

370 X«VAL<Xf> 

300 1FXC0THEN360 

390 Tf»Tf<X> 

400 lFCMf-"l"THENGOTO3040 

4ie FORJ-1T02B READVEf J' 

420 00SUB2928 

440 TAB-3 

438 FDRJ-1TO10 

460 IFJ-10THENTRB-4 

476 PRINTTABCTA8: " 

460 NEXT J _________ 

560 F0RJ-11T02B 

3ie PRINTTRB'20). J, "0*9 

328 NEXT J 

330 PRINTTRB(4j, 

340 INPUT"! 8TFRPE LE NO DE 

330 V"VRL<V») 

■«« IFVf inPV>jaTHFNPP[NT , 'T'.Tfill<4 

TT- OOTOSie 
370 VE»»VE4(V) 

380 REM 

390 -REN —LECTURE DES TERNINRIS0N5— 

eee rem 

6ie F0PI-1T06 READTAf I> NEXTI 

620 FQRI-ITQ6 READTBf I 

630 F0PI-1T06 PEADTCf I 

640 F0RI-1TQ6 RERDTCf I 

630 F0PI-1TQ6 PERDTN* ' I 

660 FOPI-1T06 READTFf I 

678 F0P1-1I06 RERIJTGf I 

689 FOPI-1T06 PEADTHf I 

690 FOPI-1T06 PEADTlfl 

709 F0PI=1T06 PEHDTKi'I 

710 FOPI*1T06 PERDTLf I 
7?n FORIalTOfi PERIlTMf 1 
730 FOR1-1T06 READTPf ] ) NEXTI 
740 F0RI-1T06 REHDEPf I> NEXTI 
758 F0P1-1T06 RERDEFf I< NEXTI 
760 FORI-1T06 READElf I' NEXTI 
77B FORI-ITG6 PERDESf 1 I NEXTI 
780 F0RI-1T06 RERDECf 1> NEXTI _ 
790 F0RI"1T06 RERDHPf Ij NEXTI 'HOBj 
900 F0R1-1T06 RERDAFfI> NEXTI ~~* ' 
910 F0RI-1T06 READAIf I> NEXTI 
920 F0RI-1T06 READRSfl) NEXTI 
930 FORI-UQ6 RERDACf I > NEXTI 
949 F0RI=1T06 RERTJTQf<I> NEXTI - 
830 FQPI-1TQ6 PEADSAfI) NEXTI 
860 FORI-1T06 READSBfH NEXTI 
870 F0RI-IT06 RERDAUf I) NEXTI 
980 F0RI-1TQ6 READEUfClJ NEXTI 

890 REM 

300 REM EXTRRCTION DU RADICAL-- - 

910 REM 

920 REM --CMOIX DES TERMINAISONS 

930 REM 

948 IFRIONTf VEf,2)»"ER"THENRf-LEFTf VEfLEN<VEf -2> 00TQ183 

REM— IER GR0UPE-- 
930 IFVE*-"RV01R'THENOOTOl6ee 
960 IFVEf»"OUVRIR"THENRf""OUVR" OOTO1410 
970 IFVEf""D£COUVRIR "THENRf""D£COUVR" GOT0141B 
986 IFRIGHTf.(VEf.2)""lR"TNENRi-LEFTf VEf LEN(VEf-2 t DOT01I3 

REM— 2E 0ROUPE-- 
990 IFRIGHTf(VEf,3>-"DRE"THENRf-LEFTf VEfLEN'VEf )-2t OOTQli 

36 REM— VERBES DRE- 
1000 IFVEf-"SQURIRE"THENRfs"SOURI" Q0T0133B 
1010 IFVEt»"RIRE"TMENR»--RI" QOTO1330 
1020 IFVEf-"ETR£"THENQQTO1310 
1030 REM— VERBES IER GROUPE-- 
1046 IFX«1THENF0RI"1T06 TEf C I >-TAf( I > NEXTI 
1030 IFX-3THENF0RI-1TQ6 TEf< I >-TDf( 1 ) NEXTI 
I860 IFX-2THENFORI-1T06 TEiC I >-TNi( I ) NEXTI 
107B IFX-4THENFOR1-1T06 TEX I )«THI ( I > NEXTI 
1060 IFX-SORX-eORX-STHENHf-R**'^" 
1096 IFX"6THENR»-Rf+' , E" 

110B 1FX-7THENF0RI«1T06 TEf ( I )*TK*(I > NEXTI 
1118 IFX«eTHENFrjRI»lT06 TEf< I >»SMC1 > NEXT] 
1120 00T0171B 

1130 REM--VER1ES 2EME OROUPE— 
1140 IFX-1THENF0RI-1TO6 TE«< 1 )-TBf < I > NEXTI 
1 130 IFX-3THENF0RI-IT0S ■ TEfU)"TPf< I ) NEXTI 
1160 1FX"2TMENF0»I"1T06 TEfC I )"TFf( I ) NEXTI 
1170 1FX"4THENFORI"1T06 TEfCI )"TJf( I ) NEXTI 
1196 IFX"30RX«60RX*9TNENRf*Rf«-I" 
1190 IFX-STHENRf-Rf*"!" 

1206 IFX-7THENF0RI-1T06 TEf C I )-TLf ( t ) NEXT I 
1218 IFX-0THENFORI-1TO6 TEftI)>Sff(I) NEXTI 
1228 GOTO1710 

1238 REM— 'VERBES DRE 

1240 1FX-1THENF0RI-1T06 TEf(I)-TCttl) NEXTI 
1230 IFX-3THENFOPI-1T06 TEfCIJ-TDtd) NEXTI 
1268 IFX-2THENF0RI-1TO6 TEfU >«TQ»< I > NEXTI 
1278 IFX-4THENF0P1-1T06 TEf I)«TJt( I ) NEXTI 
1290 IFv»30RX«8QPX*9THENPf"R**"U" 



CONJUGAISON sur CBM 64 . 



L33B 
: }4S 
1330 
.368 



1428 
I J -0 
1448 
I430 
1468 




1230 IFX-3THENFOPI-1T06 TEft I )-TDfC I > NEXTI 

1260 IFX-2THENF0PI-1T06 TE«< I )-T0*< I r NEXTI 

1270 IFX-4THENF0RI-1T06 TEf( I >*TJf ( I ) NEXTI 

12S0 IFX»30RX«80RX"9THENRf"Rf*"U" 

1290 IFX-6THENRf-Rf*"U" 

1386 1FX-7THENFORI-1T06 TEf(I>-TM»U' NEXTI 

1310 IF^»0THENFOPI-1TO6 TEf<I)-SW(I) NEXT] 

1328 &0T0171B 

REM- -VERBES SOUR IRE— 

IFX=1THENF0PI-1T06 TE»( D-TM < I ) NEXTI 

IF^«3THENF0PI-1T06 TEf < I )»TDf ( I ) NEXTI 

1FX-2THENFORI-1T06 TEfCn-TGfCI) NEXTI 

IFX-4THENF0PI-1TO6 TEfC 1 )"TJfC I ) NEXTI Rf-'^SOUR" 

IFX-7THENF0RI = 1T06 TEf(I>-TMfa> NEXTI 

IFY=0THENFOPI»1TO6 T£f ( I >»Sflf; I ) NEXTI 

C-OTO1710 

PEM—VERBES O.JVRIR— DECOUVRIR— 

IF.-;=1THENF0P1 = 1T06 TEfM)-Tflt(Ii NEXTI 

IFM-3THENF0P1-IT06 TEf CI J-TDf: I ) NEXTI 

1FX«2THENF0RI-1T06 TEf( I )-TFfC I > NEXTI 

IFy^4THENFOPl-lT06 TEf '. I >-T JfC I > NEXTI 

IFX-?THENF0PI=1TQ6 TEf C I J-TLf I > NEXTI 

IFX"0THENFOPI = HO6 TEf ' I J=SAf. I > NEXTI 

IFX=30P> > :««0PY"S'jPX"9fillDVEf- ,, 0UVRIR' , THENRf= 'OUVEPT" 

IF = , ;.CP/«6':'P:•:3f^uP-»9R'IDVE^■"DECOWRIR"TNENR^■■ , DEC0UVEPT■ 

QOTQ1718 

PEM— VEPBE EIRE- 

IFy = lTMENFiJF'I = ]T06 TEf I *-EPf I > 

1FX-2THEHF0PI-1T06 TEf I >-EFf 1 > 

IF:>3THENFCPI>1T06 TEfM»»EIf l> 

IFX»4THENFOP1-1T06 f£l'I)«ESI<l) 

IFX-7THENF0PWTO6 TEf. I >»EC*( I ) 

IFX=BTHENF0RI=1T06 TEf 1 »EUf < I ) 

IFX=50PX=60RX=90RX»9THEHRf="ETE" 

GOTO 1710 

PEM— VERBE HVOIP 

IFX»1THENF0PI"1T06 TEX I)' 
|FX-2THENFORI"1T06 TEf < I )-RFf< I ) 
1FX-3THENFORI"1T06 TEf < I )»fllf( I ) 
IFX-4THENF0PI«1T06 TEf(I)»flSfa) NEXTI 
IFX-7THENFORI-1T06 TEf ( I )"ACf ( I ) NEXTI 
IFX-BTHENFOPI-IT06 TEf( I )"HU*( I i NEXT! 
]FX-30RX-6ORX-8ORX-9THENRf- , 'EU" 

REM 

PEH —-CORPS DU PROGRAMME—- 

REM 

PR I NT "T\ 
F0RC0"lTO3 PRINT"J« 

" NEXTCO 
PRINT-fUBW.TRBO). -VERBE ".VEf." - M .T* 

pRtNT"iaaaanM.ES fleches blanches **■ te montrent" 

PRINT"LES REPONSES FAUSSES. " 
PRIMT"««OnDO>00«".- F0RC0-1TO8 PRINTT«B<4)."iB 

" NEXTCO 
P»»"JE- 

IFLEFTf<VEf.I)»"R-ORLEFTfCVEf-l)-"0-rjRLEFTf<VEf.n-'E"THE 

NPf»"J'" 

I FX-30RX-60RX-eORX-9THENP^• , ' J ' " 

IFVEfO"ETRE" THEN 1828 

IFVE»- ,, ETRE"ANBX-10RX-20PX-40RX"e0ftX-7THENPf-"JE" 

IFX-0THEN1090 



NEXT] 

■ NEXTI 
NEXTI 

■ NEXTI 

' NEXTI 

■ NEXTI 



' NEXT] 

' NEXT] 
' NEXTI 



2941 

izze 
-:'-;t' 
2971 
23-36 
2998 
MM 
2C18 
2628 

264 1' 
J638 
266C 
26 -0 

263S 
2'09 

2710 

;-74e 

2^36 

. 76(1 

27» 

2 7i?e 
2798 

1 p-e-i.1 

2818 

2 = 20 

2id38 

2^4 
28^0 
2--360 
2? 70 



2?!f 
2?20 
2'? 30 

2948 

2C'-;i> 

CTW 

L'010 
.'020 

»38 



.TRB(91.Pf 



"OUE NOUS" 
"QUE VOUS" 
■OU' ILS" 



PRINT' 

PRINT TABC9 

PRINTTABC9 

PRINTTBBC7 

PRINTTRB<7 

PRINTTAB<8 

PRINT ■«•■ 

PRINTTABO 

PR1NTTABO 

PRINTTRBC3 

PRINTTRBC3 

PRINTTRBC3 

print waac 
F0RI-1T06 

IFXf-"iTTHEN199e 
PRINTTABC13); INPUTAf 
Vf-RftTEf(I) 

IFX-3THENVf»APf(I>." "*R« GOTO2030 
IFX-6THENVf»AH(I>»" "*Rf GOTO2B30 
IFX"8TMENVf»AFf I )♦" -*f>% OOTO2B30 
IFX-gTHENVf-ASfl)*" -*Rt OOT02B30 
IFVEf-"ETRE"ANDV£f-"RVOIR ,, THENVf"TEf(l) 
lFXf-"irTHENPRINTTRB(13). ,, H".V» COTO20B0 
IFAtOVfTHENPRlNT-T". SPCC 34). '■«•'. Ff,"8" OO=;UB2900 
IFRf-VfTMENC-C+1 GOSUB3010 
NEXTI 

IFXf="IT'TMENPRINT~BBB",TRB<7),'-»C< APPUIE SUR 3TF3I 
OOTO2170 

PRINT " mmillllM BW FQREC-1T06 PRINTTABO). 
NE ■■ T EC 



1 RJf""JUSTE" 
" RJf«"JUSTES" 
■Wf'.TOBtJ) 



TU AS-.C.PPf.RJf.' 



SUR 6" 

IFC«THEN219e 

IFC-6TNENPRJNT PRINTTHB(7V'*«PHV0' APPUIE SUR 853" 

QETXf IFX«<>-B-TMEN2I7B 

RUN 

PRINT PRINTTABC9>"*1"."8 - ■"-"•BUVEL ESSAI" 

PRINTTRB(9)"F3","«8 - ■"."81ENU 

PPINTTHB';^)'■F3■' ■ "M - 8"- "CORRECTION 

C-B 

OETXf IFX*<>"B"RNDXf:>"l , 'RNLXf'.>"irTMEN223e 

iFxt«"r , oPxt""irTHeNi7i0 

RUN 

REM 

REM. — PRESENTATION — 
REM 

PPIHT"«> r" F0PTP=1T036 PRINT"-" HE": T PRINT"-, - 
F0PTR=IT022 PRINT" |- -SPCC36 '- " i" NEX1 
PPINT"t •■". FiJRTP=lTQ36 PRINT"-" NEXT PRINT"'" 
PPINT''*BB»«80l«r.TflB'-3'." ,' , F0PTR=1T032 PPIHT" ME:l 

PRINT"i" 

2330 F0RTR-IT012 PRIHTTRK3*. " l".SPC<32J-- 1" NEX1 

2348 PPINTTAB'3.. ■"■" . FORTP=1T032 PRINT"-" NE T PF HIT " • " 

2350 PPINT"*" F0PEC-IT05 PRINTTAB'2 '"M 

2368 NEXTEC 

2378 PPINT"4»»8I" TRB'10' "JT. H J U A I '- Q H" 

2388 PRINT"»8»B8Bar TAB' 12> ■ "*HIS TON CHOI-... 

2390 RETLIPH 

2400 REM 

2410 REM— DflTAS VEPBES ET TERMINRI'..ONS- 

2420 REM 

2438 DAtAJOUEP CRIEP.OAP&EP.SIFFLEP.BALAVEP.FINIP &PRND I P . PUN 
IP 



2448 CRTRCRPHiP OBEIP VEHTjPETOPDKEPEPDeE I 
C0UVR1F PIPE 

2458 DRTRSOUPIRE ETPE.AVOIP 

2460 PEM 

2470 REM- — TEPMHIRISONS PRESENT— 1103 1 

2498 HATR E-ES E ONSer FNT 

2490 DATR ll.ll IT . ir : .om.. lliLZ. IViENl 

2380 DRTR '-.■ %, -OtlS.EZ-EHT 

2510 REM 

2328 REH TEPMINHIS0N1 ItlPARFAIT— 



0UVP1P 1-L 



>'*.... FF.I 
070 '(■ 



DRTR RlS.Rlt.. HIT I0N=, IE2.R1ENT 
REM 

REM— TERMINAISONS FUTIJR— 
REM 

DATA ERfil. ERAS. ERA. ERONS.EPE2.EPONT 
DATA IRA1 , IRAS. IRA, IRONS IREZ,IPOHT 
DATA RAl.RRS.RA.RONS.REZ-ROHT 
REM 

REM— TERMINAISONS PASSE SIMPLE- 
REN 

DATA AI.AS.A.AnES.RTES-EPENT 
DATA IS.IS.IT,IMES,ITES.IRENT 
REM 

REM- — TERMINAISONS CONDIT IONHEL- — 
REM 

DATA ERRIS.ERAIS.ERRIT.EPIONS.EPIEZ.EPRIENT 
DATA IRAIS.IRAIS.IRRIT, IPIONS. IPIEZ. IPRIENT 
DATA RAIS. PAIS. RAIT. RIONS . RIE2 ■ PAIENT 
REM— TERMINAISONS IMP IP— 
DRTR ISSRIS.ISSRIS.ISSAIT. ISS10NS. ISSIEZ. ISSRIENT 

REM ETRE 

DATRSUIS-ES.EST.S0MnES,ETES.SONT 
DRTRSEPR I . SERRS . SERR . SEPONS , SEPEZ • SEPONT 
DATAETAIS.ETRIS,ETflIT,ETIONl,ETlEZ.ETAlENT 
DATRFUS.FUS.FUT, FUMES. FUTES.FIJRENT 
DRTRSEPRIS.SERRIS.SERRIT.^EPIOttS.SEPlEZ.SEPAIENT 

PEM RVOIR 

DATAAI.A*.,A.AVONS.RVEZ.ONT 

DATRHUPfl I , RIJPRS . «JRR . RUPONS , RUREZ • AUPONT 

DATAAVRIS.fiVAIS.RVRIT.ftVlONS.RVIEZ.RVRIENT 

DATREiJS • EUS • EUT , EUMES EUTES ■ EURENT 

DRTRNlJPRIS.Rl.lPAIS.flUPRIT.R'.tPirjNS.filJPIEZ.AlJPRIENT 

DATAS.S.T.ONS.EZ.ENT 

REM— SUBJONCTIF PRESENT - — 

DATAE.ES.E.IOtJS.IEZ.ENT 

DATA1SSE. USES, ISSE. ISSIOHS, ISStEZ. ISSENT 

DATAAIEAIES.R1T.RV0N"; RVECRIENT 

DATASOIS-SOIS.SOIT-SOVONS ;rr/EZ. 1.0IENT 

PP I NT "4fffMHffOr. F0PE=1T011 PRIIITTRB'4>. 

PRINT- " NEXTE 

RETURN 

REM 

PWE54296-1 1 , PWE5427?. 130 POtE34280.? P«'.E^42g3.240 

P0KE94283, 17 F0RHU-ITO286 NEXTHU PC*E54283.0 

RETURN 

PC*E54296. 15 P0+E5427? ;.07 Pr>E54280,'J4 P0KE94289.248 

P0KES42S3.1? FOPWJ^ 1 T02W iC:<TMr.i POtE54283.0 

RETURN 



3158 
3168 

•170 



INT-T P0KE53286,8 P»E53281.0 
F0PECMTG5 PPINT"jn 

" NEXTEC 
PPIHT"««".TAE':8>."StKEVI3lQM DES 1ERM1NAIS0NS- 

' -f hit awoaaBftiwwoan M B iWM i " forec-ito3 

PPINT'M ' *XT 

PPINT—n".TflB<4>."**ET0UP RU MENU APPUVER SUP 9F1" 
PPINT'UBOBM" F0REC = IT03 PRINTTRB<5>"B»I 
NEXTEC 

print "«8ooaaor . trbc ie> . ~m~ . Tt 



3210 

S328 

?2 30 

324t! 
3250 
■^60 
3266 

::70 
:-2?o 
.2:-c- 

3310 

3320 



3 3 70 

3400 
3410 

3420 
3430 
3440 
3450 
3460 
34 78 
3480 
34 30 
3588 
3510 
.^■520 
3330 
354 
3350 
3360 
35-0 
35^0 
3530 

■eee 
.'6:0 

jrf20 

3630 

3*40 

3r5£ 
3660 
36^0 

3680 
36^0 

, >n 

371B 

3 -28 
J738 

1-40 
: -0 



) PPINT-W1ER GR.B »EME GR.l 9QEME 0R.8 fOEME EN DR£- 

) PRINT 

} PRINT-JI E IS S DS" 

PRINT-SI ES IS S DS" 

PRINT - ™ E 

PRlNT-fl ONS 

PR1N7-JI E2 

PRINT-IFI ENT 

OOTO3990 

GOT 03990 

PR I NT "M VERBE * 

PPINT 



tD)ONS" 
<D>EZ " 
(D»ENT" 



INFIN1TIF ♦ TERMINAISONS ' 



IPRRLEP^ RI 



R I'- - 
HIS' 

hi: ■ 
IONS" 



RIN7" 

PRINT"fl 

PRINT"!!! 

PRINT H fl 

PRINT'm 

PRINT'S! 

PRINT" n 

PRINT 

PRINT-m 

PRINT-™ 

PRlNT-n 

PRINT-™ 

PRINT-m 

PRINT"n 

PRINT -n 

PRINT 

PRINT-n 

PRINT-™ 

PR INT -n 

PRINT-I 

PRINT-B ATES 

PRINT"B ERENT 

OOTO3890 

PRINT PRINT 

PRINT-nRUXILIAIRE RVOIR OU ETRE AU PRESENT" 

PRINT-ET PART1CIPE PASSE DU VERBE." 

PRINT PRINT"H J'AI COURU" 

0OT03998 



"■IB AME5 



mil 

ITES 
I RENT 



UMES" 
UTES" 
URENT" 



PRIN 



RINT 



PRINT-nmjXILIAIRE AVOIR OU ETRE A L' inPARFAIT" 

PRINT-ET PART1CIPE PASSE DU VERIE." 

PRINT PRINT-n J-AVAIS COURU" 

OOT 03898 

PRINT-R8 VERBE A L'INFINITIF ■ 

PRINT 

IPARLERW RIB" 

AIS" 

HIT" 

IONS' 



TERAINA180N8 



PRINT" 

PR INT "B 

PRINT"™ 

PRINT"flI 

PR I NT -n 

PRINT-fll 

PRINT PRINT 

PRlNT-flRUXlLIAIRE AVOIR OU ETRE AU FUTUR SIMPLE" 

PRINT"ET PARTICIPE PASSE DU VERiE. " 

PRINT PRINTS J'AURAI COURU" 

GOT 03098 



AIENT- OOTO3098 



RINT i 



(IHT 



) PRINT-nPUXILIRIRE AVOIR OU ETRE AU PASSE SIMPLE" 
I PRINT"ET PARTICIPE PASSE DU VERBE." 
I PRINT PRINT"n J'EUS COURU" 
1 G0T03998 

KEME OR. V 83EME 0R.8 3PEME EN DRE" 



• i 32f 

win 

3840 
??50 
??60 

?e7e 

3V?t' 

3990 
- Mfl 



ION':, 



PRINT"™ 

PRINT"™ 

PRINT"™ 

PRINT "SI 

PRINT-™ 

PRlNT-fl ENT 

GOTO3990 

GETZf IFZf"""THEN3990 

lFZf:.'"l"THEN3990 

PUN 



ISSE 

ISSES 

ISSE 

ISSIONS 

ISSIEZ 

ISSENT 



D£ 



CD>IONS" 
<D)IEZ " 

'.DlENT" 
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Formation a I'assembleur 



COURS D'ASSEMBLEUR 



Deia des mois que vous plan 
chez. les uns grace au cours 
pratique, les aulres sur les 
connaissances plutot theonques 
(et relhonques ? ) de finfofmati- 
que en general el de la pro- 
grammation en assembleur en 
particular. 

Pour cede semaine un grand 
mouvement de reflexion du cole 
du 6502 de l Apple Mais les fa- 
natiques du 6809 du T07 ne 
perdent nen pour altendre : la 
semaine prochame sera pour 
eux ! 

Depuis le debut nous avons eu 
les cours suivanls : 

No 55 ->ZX81 

No 56— ->ZX81 

No 57 - > ORIC 1 . ATMOS 

No 58 — -> APPLE 



No59- 


--> T07. T07 70 


No60 - 


•-> COMMODORE 64 


No 61 • 


•>ZX81 


No62- 


•>ORIC 1. ATMOS 


No 63- 


--> APPLE 


No64 - 


■>T07. T07 70 


No65- 


••> COMMODORE 64 


No 66- 


--> ZX81 


No 57- 


-> ORIC 1, ATMOS 


No 68 


••> APPLE 


No 69- 


-> T07, T07 70 


No70 ■ 


■ > COMMODORE 64 


No 71 . 


• >ZX81 


No72- 


--> ORIC 1. ATMOS 


No73- 


■■> APPLE 


No 74 - 


-> T07, T07 70 


N0 7S- 


••> COMMODORE 64 


No76- 


->ZX81 


No77- 


■>ORIC 1, ATMOS 


No78- 


--> APPLE 


No79- 


••> T07. T07 70 


No 80 


■-> COMMODORE 64 


No 81 - 


--> ZX81 


No 82 - 


-> ORIC 1. ATMOS 




GENERALITES SUR LES ROU- 
TINES 

Lorsque vous ecrivez un pro- 
gramme en Basic, vous avez 
sans doute pris i 'habitude de'- 
fecluer certains travaux repetitifs 
a I'aide de sous-programmes, 
que vous les appeliez par un 
Gosub ou par un Call. Cette 
bonne habitude, vous n'avez 
pas besoin de la perdre 
lorsque vous travaillez en as- 
sembleur, mais vous vous de- 
vrez de veiller a certains details 
qui etaient automatiquement 
geres par le Basic 

Reprenons a la base nos 
connaissances de programma- 
tion et tentons d y voir plus clair 
quant a la gestion des sous-pro- 
grammes Imaginons la structure 
de programme suivante : 

Programme 

1 . PAS 1 

2. ALLER AU SOUS-PRO- 
GRAMME a 

3. AFFICHER LES RESULTATS 

4. FIN 

Sous-programme a 

1.PAS1 

2. PAS 2 

3. ALLER AU SOUS-PRO- 
GRAMME b 

4. PAS 3 

5. RETOUR 

Sous-programme b 

1 . PAS 1 

2. PAS 2 

3. RETOUR 

A chaque tois que la lineante du 
deroulement du programme se 
brise, deux possibilites s'offrent 
au micro-processeur : 
a. il s'agit d'un saut incondition- 
nel et le PC (ou compteur ordi- 
nal) s'occupe de la nouveiie 
adresse. sans autre 
b il s'agit dun appel a un sous- 
programme et ladresse a partir 
de laquelle lappet a eu lieu doit 
elre memorisee. 

Lors de I'etape 2 du programme 
ci-dessus. nous appelons un 
sous-programme. Lorsque la 
routine a est executes, nous 
devons revenir a lendroit sui- 
vant immediatement celui ou a 
eu lieu lappel a la routine a. Ce 
qui signitie en clair que nous 
devons, a chaque appel a une 
routine, memoriser dans un en- 
droit precis de la memoire les 
adresses de retour de sous-pro- 
gramme. 

Dans I'exemple que j'ai donne 
ci-dessus. vous avez pu voir 
qu'au sein de la routine a. on 
trouve un appel a la routine b 
Nous allons done avoir deux 
adresses de retour a stocker et 
a ne pas melanger. Autrefois, on 
utilisait un registre de seize bits 
pour stocker une adresse de re- 
tour, ce qui sigmfiait quit Start 
impossible de realiser un appel 
de routine a parttr dun sous- 
programme sans partir dans des 
complications mfernales Au- 



jourd'hui, le micro-processeur 
utilise une pile systeme de type 
FILO (First In Last Out, ou pre- 
mier rentre dernier sorti) dans 
laquelle il entasse les adresses 
de retour comme des assiettes 
dans le buffet de la salie a man- 
ger. 

Lorsque le sous-programme sort 
de la routine b. il retrouve sans 
peine lendroit d oil venait lappel 
et redemarre done a i'etape 4 
du sous-programme a. Une fois 
celui-ci arrive a son terme. le 
micro-processeur prend 

ladresse de retour dans la pile 
systeme et revient a I'etape 3 du 
programme principal. 

Vous voyez done que i'assem- 
bleur n est pas aussi limits qu'il 
en a lair . mais les routines 
que vous creez sont maigre tout 
limitees par un certain nombre 
de criteres et de regies, fort sim- 
ples a assimiler d'ailleurs 

Premiere regie fondamentale et 
totalemenl inviolable : une rou- 
tine ne peut et ne doit pas s ap- 
peler elle-meme. Pourquoi ? 
Tout s'explique. mais nen ne 
parle autant a l imagination 
qu'un bon exemple Ecrivez 
done, a I'aide de votre pro- 
gramme d'assemblage prefere. 
un programme du type suivant 

Programme 

10 Aller a la routine a 
20 Afficher les resultats 
30 Fin 



100 Afficher coucou 
110 Aller a la routine a 
120 Retour 

Que va-t-ii se passer 7 Le 
micro-processeur va lire la pre- 
miere instruction Cest un appel 
a une routine II stocke done 
dans sa pile syteme ladresse 
20 (qui correspond effectivement 
a lendroit ou il devra revenir 
une fois la routine executeel II 
arrive done dans la routine, il af- 
liche coucou et tombe ensuile 
sur un appel de routine H me- 
morise ladresse de retour |en 
l occurence 120) en la stockant 
dans sa pile systeme au-dessus 
de la precedente (20) el part 
execute' la routine II arrive 
done dans la routine, il affiche 
coucou et il tombe ensuite sur 
un appel de routine II memorise 
ladresse de retour 

Illusions par un schema relatr- 
vement simple le travail execute 
par le micro-processeut lors de 
lexecution de ce programme 

Boucle internals 
Programme 



Vutt DE C£5 OF"* 
tl£t<\E CMPEAU IJ«E 




Comme vous vous en etes me- 
vitablement rendu compte. le 
micro-processeur ne pourra 
jamais atteindre ('instruction de 
retour II continuera done a em- 
ptier soigneusemenl les adres- 
ses de retour successives, |us- 
qua un certain point. Cest ce 
point que nous allons determi- 
ner, qui nous donnera par la 
meme occasion une autre limita- 
tion concernant I usage des rou- 
tines. En theorie. la seule limita- 
tion que peul connaitre le micro- 
processeur dans i execution de 
ce programme se situe au ni- 
veau de la dimension de sa pile 
systeme En effet, si la pile sys- 
teme a ete congue pour recevoir 
N adresses de retour, lorsque le 
micro-processeur tera appel 
pour la N + 1 erne fois a la rou- 
tine a. il n auia plus la place de 
stocker ladresse de retour. 

Cest a ce stade du raisonne- 
menf que la pratique distingue 
deux possibilites de resoudre le 
probleme Suivanl lepoque de 
conception du micro-ordmateur 
(et en fonction du micro-proces- 
seur qu'il a dans les entraiiies). 
la solution apportee sera plus ou 
moms catastrophique pour le 
programmeur. 

a Methode antique : le micro- 
processeur ignorait le fail qu il 
depassait la capacite de sa pile. 
et il continuait a empiler des va- 
leurs jusqu'au remplissage total 
de la memoire. ou jusqu'au mo- 
ment ou il touchait a une partie 
de la memoire utile pour I execu- 
tion du programme Le program- 
meur devait done eviter a tout 
pnx des erreurs de ce genre 
car il devait a ce moment-la 
etemdre le micro pour reprendre 
son travail et il avait par la 
meme occasion perdu loul ce 
qu'il avait realise iusqu a ce mo- 
ment 

b Methode actuelle : cette solu- 
tion n est maiheureusernent pas 
encore systematiquement im- 
plantee sur les pelits syslemes 
mformaliques lets que les micro- 
ordmateurs famihaux En void le 
principe des que Ion parle de 
pile, on sous-enlend I existence 
d'un pomteur de pile Ce pom- 
leur contient I adresse de la pre- 
miere case v>de dans la pile 
Lorsque Ion range une valeur 
dans la pile, ce pomteur est in- 
crements, et lorsque Ion retire 
une valeur de la pile ce pomteur 
est decremente Dans le cas qui 
nous preoccupe lorsque le pom- 
teur attemt une valeur limite cor- 
respondent au sommet de la 
pile, le micro-processeur gere 
automatiquement ce sur-rem- 
phssage de la pile en rendant la 
main a lutilisateur el en signa- 
lani a celui-ci un depassement 
de la capacite de la pile 



Routine a J)4 ^^ tti A « 5Ai ^mp 

■ -"ippeuci 




L'ASSEMBLEUR PRATIQUE 
Langage machine . . . APPLE 
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Vous etes createur de program- 
mes, el comme lout le monde 
vous avez fait vos premieres 
armes avec le BASIC Cest 
bion. cest chouette. on se 
marre mais cest quasiment 
aussi lent que I escargot de Ca- 
rali. qui a mis 80 numeros avant 
darriver a se giisser dans le 
journal. 

Lorsque jai moi-meme demarre 
l assembleur je me suis pose la 
question suivante comment 
adapter le mini - programme 
BASIC suivant ? 

10 HOME 

20 PRINT'SALUT LES MECS' 

30 PRINrCE PROGRAMME 

INUTILE EST VACHEMENT 

BALEZE 

Je vous vois venir. la lete enfan- 
nee et les yeux pleins d un cour- 
roux d enfer Quel est linteret de 
i assembleur pour des program- 
mes aussi cons 7 Alors la. |e dis 
Stop, halte Zofl" L impression 
de chaines de caracteres a 
I'ecran est la base de toul bon 
programme II nexiste pas un 
seul bon jeu qui se respecte 
sans cette desormais ceiebre 
routine de PRINT que nous 
allons deconiquer un peu plus 
loin 

Auparavant. histoire de vous 
laisser manner dans votre |us 
danxiste. je vais vous faire re- 
passer quelques notions en 
revue A mon commandement, 
prSsentez armes 
Inutile de revenir sur la sous- 
routine COUT (adresse S 
FDED). Quelqu un a cne 
"SI "" " Ok. |'y reviens En 
deux mots, ce sous-programme 
fixe dans le moniteur de I Apple 
se tape tout le boulot d'affichage 
des caracteres Pour lutiliser, on 
place dans I accumulates le 
code ASCII de la lettre a affi- 
cher. Ensuite. cest lout benefice 
pour nous autres feignants. car 
COUT s'occupe de gSrer la po- 
sition du curseur sur I'ecran, de 
placer la lettre et tutti quanti. ca 
baigne. 

Bien En resume voici comment 
I affiche un O sur I'ecran Uau- 
rais pu prendre un A. mais un 
peu de scalo na jamais fait de 
mal a personnel 

ORG $ 300 
LDA * $ D1 

JMP $ FDED 

Equivalent hexadecimal 

300 A9 Dl 4C ED FD 

On vous a tenement serine ce 
pnncipe dans divers cours d as- 
sembleur que ce doit etre du ga- 
teau pour vous. mes petits bi- 
chons Des lors comment 
afficher une chaine de caracte- 
res ? Rien de plus simple, repor- 
lez-vous au cours du numero 
78 

Pourlant ce que je veux faire 
aujourd hui (el |e vais y arnver) 
cest eenre un sous-programme 
d'affichage utilisable a nimporte 
quel moment a I mleneu' d un 
autre programme En PASCAL 
on appellerail ca une Procedure 
en assembleur une sous-routine 
mais ce ne sont que des mots 
Pour cette recette du jour que 
nous allons intituler PRINT |va- 
chemeni original comme nomi. 
nous avons besom dun pom- 
teur. du sous-programme 
COUT. el de la pile Accrochez- 
vous a vos dasquettes voila le 
source : 

ORGS 300 

PTR - S 46 

COUT--- SFDED 

DEBUT JSR PRINT 

ECRIT ASC'SALUT LES MECS 

HEX 8D00 

JSR PRINT 

ENCORE ASC'CE PROGRAMME 

ESTVACHEMtNt UALEZE 
HEX 6D00 
STOP RTS 



PRINT PLA 

STA PTR 

PLA 

STA PTR + 1 

LDY * $ 01 

SUITE LDA (PTRIY 

BEQ FIN 

JSR COUT 

INY 

BNE SUITE 

FIN CLC 

TYA 

ADC PTR 

STA PTR 

LDA PTR + 1 

ADC # $ 00 

PHA 

LDA PTR 

PHA 

RTS 

Et maintenant la meme chose 
en hexadecimal : 

300 20 3A 03 D3 C1 CC D5 D4 
308 A0 CC C5 D3 A0 CD C5 C3 
310 :D3 8D 00 20 3A 03 C3 C5 
318 A0 DO D2 CF C7 D2 Cl CD 
320 CD C5 AO C5 D3 D4 A0 D6 
328 :C1 C3 C8 C5 CD C5 CE D4 
330 A0 C2 C1 CC C5 DA C5 8D 
338 O0 60 68 85 46 68 85 47 
340 A0 01 B1 46 F0 06 20 ED 
348 FD C8 DO F6 18 98 65 46 
350 85 46 A5 47 69 00 48 A5 
358 46 48 60 

Ceci necessite quelques 
commentaires. Les outils tout 
dabord : PTR est un pomteur 
temporal re. cest a dire une 
case qui nous permettra de sto- 
cker des valeurs et de les re- 
Irouver facilement car nous 
sommes tres brouillons. 
Des le debut du programme. 
nous sautons en sous-routine 
PRINT, et la (God bless us) que 
se passe-t-il ? 

Nous tirons de la pile (PLA) 
ladresse de dSpart de la chaine 
a afficher. lei. cest ladresse de 
ECRIT-1 Nous slockons cette 
adresse dans le pointeur 
Comme une adresse comporte 
toujours deux octets, cette ope- 
ration est repetee deux fois de 
suite Pour resumer ce point de 
brume, ladresse de ECRIT-1 se 
trouvera en PTR et PTR+ 1 (S 
46 et S 47) 

Suite a cela. j utilise le registre Y 
en lui donnant la valeur 01 Ce 
registre va me servir de comp- 
teur de chaine Je penetre alors 
dans I mteressante boucle ci- 
dessus nommse SUITE lei. par 
le principe de I adressage indi- 
rect mdexe. ie vais chercher une 
a une les lettres de ma phrase 
Comment se peul-il que cela se 
tasse-t-ii. tabernacle ? Cest sim- 
ple. L adressage indirect mdexe 
en page zero met dans I'accu- 
mulateur la valeur se trouvant a 
ladresse mdiquee par le poin- 
teur (PTR) plus la valeur de Y 
En l occurence. | ai mis dans le 
pomteur ladresse S 302 Sa- 
chant que Y« 1, la valeur char- 
gee dans laccumulateur sera 
celle se trouvant en $ 302+ Y 
soil S 303 Et la, merveille ver- 
meil, que trouvS-je sous mes 
yeux ebahis el mes paupieres 
esbaubies '"?'" La premiere 
lettre (sous forme de code 
ASCII! de ma phrase a afficher 
Etant prudent de nature. )e ven- 
fie si cette valeur ne serait pas 
(par hasard) un zero. (BEQ 
FIN) Auquel cas je mempresse 
de filer en sortie de programme 
En effel vous noterez que | ai 
pns som de faire suivre chacune 
de mes phrases des valeurs sui- 
vantes 8D 00 Le 8D est le 
code ASCII du retour chariot Ce 
qui siqmiie quon va a la ligns. 
et le 00 annonce la fm de la 
phrase Tant quil n'y a pas de 
00 dans laccumulateur. la bou- 
cle SUITE affiche lout ce qui lui 
tombe sous la mam 
Apres chaque affichage de ca- 
raclere. j mcremenle Y et je re- 
lourne en SUITE Par conse- 
quent ie placerai dans 
laccumulateur la prochame let- 
tre de ma phiase Prenez Irois 



aspros et relisez tout ca au 
calme 

Vous noterez que ce principe 
me limite a un affichage maxi- 
mum de 255 caracteres En 
effet, si Y attemt la valeur 255. 
en lincrementant encore, il re- 
prendra la valeur 00 Dans ce 
cas. la routine recommencerait a 
afficher la chaine sans sarreier 
Pour Sviter csla. |6 compare Y a 
00 (BNE SUITE) Si Y prend 
cette valeur de 00, le pro- 

?ramme va automatiquement en 
IN 
Voyons maintenant ce qui se 
passe dans cette partie FIN qui 
est aussi mysteneuse que la 
chambre royale dans la grande 
Pyramide du Nil. 




En premier lieu, je mets la rete 
nue a zSro, ce qui laisse presa- 
ger une addition proche Je 
transfere ensuite la valeur de Y 
dans laccumulateur A ce mo- 
ment-la, Y est egal au nombre 
de signes de ma phrase * 1. 
Dans mon pointeur. jai toujours 
ladresse de depart de ma 
phrase (ECRIT-1) En ajoutant a 
cette adresse la valeur de Y. ie 
vais automatiquement trouver 
ladresse de la fin de ma 
phrase Ce que |e veux obtenir, 
cest qu apres I affichage. le pro- 
gramme reprenne son cours non 
pas a la suite de mon JSR 
PRINT, mais a la suite de la fin 
de ma phrase 

Apres un JSR. le microproces- 
seur va chercher sur la pile 
ladresse de retour Cest done 
en falsifiant cette adresse que je 
peux le pieger. En I occurence je 
vais lui donner ladresse de fin 
de phrase. Pour cela je remets 
sur la pile les deux valeurs du 
pointeur incrementees de la lon- 
gueur de la chaine. Cest a la 
fois simple, complique et vache- 
ment ruse. 

Linteret de cette routine PRINT 
est quelle est relogeable tres fa- 
cilement et utilisable a nimporte 
quel moment dans nimporte 
quel programme La regie a res- 
pecter pour afficher une phrase 
sera done la suivante : 

- JSR PRINT 

• ASC LA CHAINE A AFFICHER' 

- HEX 8D00 

La chaine doit IMPERATIVE- 
MENT se terminer par un 00. 
smon cest le plantage assure, 
boniour I ambiance. 
Vous pourrez utiliser PRINT 
dans tous vos programmes ne- 
cessitant de I affichage Mais si 
vous pensez que cest son seul 
avantage. vous vous meltez le 
connecteur dans i oeil jusqu au 
lecteur de disquettes.En effel, 
cette routine est egalement utili- 
sable avec les commandes du 
DOS 33 Ce qui est fort exci- 
tant, convenez-zan. Vous pour- 
rez done envoyer des comman- 
des *en simulant le PRINT 
CTRL-D du BASIC suivi de 
lenonce de la commande en 
noubiiant pas dajouter un re- 
tour chariot et un zero. 
Ne vous reiouissez pas Irop vite. 
possesseur de PRODOS Cette 
facon de faire nejui plait pas du 
tout, et il se piantera en beaute 
Sachez tout de meme que I ap- 
pel de commandes PRODOS 
est tres simple, mais nous ver- 
rons ca quand jaurai moi- 
meme compris. 

Nanus de ce fabuleux outil de 
travail quest la routine PRINT. 
vous allez pouvoir nous concoc- 
ter d inoubliables programmes 
qui nous feront pendre la ma- 
choire sur la moquette Mes- 
sieurs, je n ai qu un mot a dire 
a vos disquettes ' 
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DEMANDEZ LE PROGRAMME soft-parade 

Achetez vos loaiciels les veux fermes. nous les avons testes nnur vous I — 



Achetez vos logiciels les yeux fermes, nous les avons testes pour vous 

Nous avons selectionne pour vous les meilleurs logiciels actuellement disponibles en France. Nous ne 
pretentions pas que cette liste est complete et definitive et ilest evidentque nous y rajouterons regulie- 
rement des programmes. Pourtant, vous chercherez en vain certains programmes quijouissent d'une 
bonne reputation et qui se vendent surtout grace a la publicity et aux conseils des vendeurs quinepeu- 
vent pas connaitre tous les logiciels disponibles. 

Les prix sont, nous I'esperons, les meilleurs du marche et les abonnes - anciens ou nouveaux - benefi- 
cient en plus d'une remise de 10 %. Si vous etes nombreux a nous suivre dans cette experience nous 
pourrons rapidement arr'tver a taire baisser les tarifs des fournisseurs pour atteindre I'objectif que nous 
nous sommes fixe: ramener les prix a une plus juste valeur ! 

Les classements sont faits en fonction de linteret du programme et ne t'jnnent pas compte des prix, 
c'est a vous dejuger de I'opportunite de la depense. Noubliez quand meme pas que si le rapport quali- 
te/prix est mauvajs, le logiciel ne peut figurer dans cette page ! 



•nouveau- 



KRYSTAL OF ZONG 

De Taction e! de larcade. le tout dans 
un meme programme Incfoyable mais 
(merci les chosurs) A ne rater sous aucun 
pretexte isaut avis medical contrairei 

UP'N DOWN 

Jamais vu de route pareille, et pourtant ca 
monte et ca descend comme les monta- 
gnes russes de la Foire du Trone 

TAPPER 

Un p'tit coup a servir. facile Cent grands 
coups ? Dur, tres dor et pourtant on y arrive ' 

SORCERY 

Voila un jeu daventures qu'il est bon ' 
Pas de probleme de vocabulane loul au 
joystick Et ii est beau 

MACADAM BUMPER 

Le meilleur simulateur de Hipper el avec un 
editeur de Clippers Pourquoi aiier au cate ? 

DEFEND OR DIE 

Le plus dingue des jeux d arcade chez 
vous. et en stereo ' 

MEURTRE A GRANDE VITESSE 

Une enquete a 260 Km/h a mener lambour 
battant , en vous basant sur les indices four- 
nisavec lesoft 

SERIE NOIRE 

Un veritable jeu de meurire (Killer) em re Ha 
ditferenls loueurs Qui embrasserez vous. 
tuerez-vous ou volerez-vous ? 

SURVIVOR 

Do I'avonture. vile et bien servie. en couieur 
et haute resolution, sans probleme com- 
plexe a resoudre survivre sera votre soul 
mot d'ordre 

MESSAGE FROM ANDROMEDA 

En voilA un superjeu d'aventure, largement 
plus beau qu'un camion et encore plus 
largement passionnant 

FOREST AT WORLD'S END 

Le bout du monde a vos pones, juste apres 
le troisieme arbre a gauche Un dedale 
d'aventures rocambolesques ou engois- 
santas 

HOUSE OF USHER 

Ciausirophobes eioignet -vous. cette aven- 
ture s'adresse exciusivemeni aux agora- 
phobes 

BC'S QUEST FOR TIRES 

La course a I'echalotte prehistonque. nan 
de lei pour rester en jamb* ' 

LUNAR LEEPER 

Des tonnes de ferraiiie vous sautent des- 
sus. sachez les eviter pour mieux servir 
voire natale planete 

JAW BREAKER II 

Comme vous n'avez pas peur des plus gros 
que vous, defoncez ces dents qui vous 
guettent 

AOUATRON 

Defendre la Terre passe encore mats net- 
toyer en plus les oceans, faut pas pousser 
A moms que vous ne soy ez plus baleze que 
baleze ' 

LE CRIME DU PARKING 

Resoudre une affaire aussi sordide et cra- 
puleuse qua le meurtre d'Odile Conchou* 
necessite un sang-froid et un espntdeduc- 
tif aceres Senei-vous la reincarnation de 
Sherlock Holmes 7 



SPY HUNTER 

Vous passezdeiavoiiurede James Bcndau 
bateau de 007 Un must du ieu d arcade 

DARK STAR 

Partez a la rescousse de la Gaiaxie. 
sans peur et sans reproche Votre 
ecran n'y ve"a que du feu en plon 
geant de planete en trou noir el de 
combat spatial en hyperespace 

ZAXXON 

3e larcade comme au cafe Etlarge- 
nent plus abordabie ' Un classique 
qui manquait au Spectrumiste averti 

PSI WARRIOR 

Des combats a coups d'energie psy 
chique. des ballades en skate anligra- 
vite. des dizames d'heures de recher- 
ches avanl d'aitemdre la Source de 
lout le Ma) Genial 

SPY VS SPY 

Relrouvez tous les documents se- 
crets, placez des bombes et partez le 
premier de ce pays surpeupte par les 
espions Un must pour deux joueurs 

BOULDER DASH 

Depuis Lode Runner, les jeux d'arca- 
de vous ennuyaienl ? Ce probleme ne 
se pose plus dorenavant vmgt ta- 
bleaux et cinq niveaux pour passer 

des heures uniques 

MEURTRE A GRANDE 
VITESSE 

De I' a venture du suspense et de la re- 
flexion Un vrai polar d Agatha Chris- 
tie ou vous devenez Hercule Poirot 
Extraordinaire de sublime et d'inge- 
niosite 

XAVIOR 

Plus vite. toujours plus vile ' Des kilometres 
de pieces a fond les mariettas Heureuse- 
ment, pas de radar a I horizon et le comp- 
teur qui s'envole waow c'est le pied 



Une bonne enquete vaut mieux que deux 
gangsters dans le dos. dans une impasse 
avec un reverbere en panne Un vrai bon 
polar 

3DFONGUS 

Le Pans-Dakar en avion, ca vous dil ' C est 
lout pareil. on perd la piste, on s'emplafon- 
ne des rhinoceros, mais on se mama bien 

INVASION 

Des Aliens co-nr ,e sil en pleuvait. des dan- 
gers a tous les coins de la gaiaxie. de I ac- 
tion etdu sang-froid voilacequivousguet- 
te des que vous prendrez les commandes 
de votre vaisseau 

COBRA PINBALL 

"Beau comme un camion" vous connais- 
sez Splendide comme un flipper" vous 
allez I ap prendre avec ce super soft de 
course Du massage el du bourrage en 
quantile, d' accord, mais aussi en qualite 

BATTLE FOR MIDWAY 

Si vousavez la megalo galppanle. precipi- 
tez-vous I'Amiral Fletcher, c'est vous 1 A 
votre casque tte 

FRELON 

Bande de petit salopards vous n etes pas la 
pour fnmer! C'est la guerre, el malgre les 
ennemis qui nous canardent. il faut alter re- 
parer ce sacre pont ' Le premier qui cne 
"Maman" a mon pied aux iesse^ * 
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LOGICIELS Ordinateurs Prix Ote 



TOTAL 

Participation aux frais de port en recommande 
REDUCTION 10% SPECIAL ABONNES A DEDUIRE 
N" ABONNE (obligatoire) 

Amtm . , MONTANT a payer 

date de la commande : 

LB5C Jl en ^ 5 ' eciJt ' ' M.-asencaissesavantlalivrais. 

mantles Cheque renvoye en cas de ruplure de slock 



Montant 




APPLE 








1 COHAN 


DISK A 




ISO 


1 CRIME DU PARKING 


DISK F 




IM> 


3 LOOf RUNNER CHAMPIONSHIP 


DISK A 


i M 


1'S 


4 BRUCE LEE 


DISK A 


J M 


»s 


5 SKYFOX 


DISK A 


j M 


MS 


t PARANOIAK 


DISK F 


* H 


3M 


7 DALLAS 


DISK A 


v a 


MS 


S EPIDEMIC 


DISK F 


v H 


HS 


9 AXIS ASSASSIN 


DISK A 


J M 


MO 


'0 BC'S OUE3T FORTIRES 


DISK A 




IK 


1 1 LUNAR LEEPER 


DISK A 




IM 


1 3 AOUATRON 


DISK A 




IfN 


1 1 JAW BREAKER tl 


DISK A 




ISO 


14 ONE -ON -ONE 


DISK A 


B M 


380 


IS AZTEC 


DISK A 


J M 


330 


1 6 IFR SIMULATEUR DE VOL 


DiSK F 


J H 


ISO 


1 7 PINO ALL CONSTRUCTION 


DISK A 


J M 


MO 


■ BCMOPUFTEft 


DiSK A 


J M 


MO 


<S HARD HAT MACK 


DISK A 




MO 


AMSTRAD 








1 SORCERY 


K7 H 


J U 


110 


1 OCFtND OR Die 


K7 A 




110 


3 MACADAM BUMPER 


K7 F 




IM 


4 MEURTRE A ORANOE 
VITESSE 


K7 F 




IM 


SSWRVTVOR 


KT A 




HO 


< BATTLE FOR MIDWAY 


KT A 


J M 


ISO 


7 HOUSE O* USHER 


K7 A 




110 


I FOREST AT WORLD'S (NO 


K7 A 




M 


S MESSAGE FROM ANDROMEDA 


KT A 




N 


I0SERKNO4RE 


K7 A 




us 











ZENJI 

Pas mai. les jeux de reflexion Bien. les |eux 
d'arcade Super, les tableaux speeds Alors, 
le melange des trois, qu'en diles-vous ? 

RIGEL 

Explorer, cartographies ce monde encore 
inconnu pour en preparer la defense avant 
que les pirates nesymcrusfen' Puisdefen- 
dez-ie 

SCORPIRUS 

"Argh '". pensez-vous ; "ca va vraiment 
mal " Bien pense car guider cette fichue 
besdole dans ces sacres labynnthes. ce 
nest pasde la larte ' 



Plus vrai que nature le pilotage de eel Air- 
bus A vous de demontrer que vous en etes 
digne ' 

HOVER BOVVER 

Imagmez une belle pelouse. mais alors vrai- 
menl super belle El imagmez que per 
sonne ne la londe et que vous pouvez 
Subreplicemenl utiliser une superbe ton 
deuse de course 



si vous etes 

ABONNES 

deduisez VOUS-MEMES 

vos lO % 

de remise sur 

le bon de commande 



lO % de remise pour 
les abonnes ! 



COMMODORE 64 










1 REALM OF IMPOSSIBILITY 


DISK 




M 


SBO 


1 LOOE RUNNER 


■■ 




U 


3SO 


J LOOE RUNNER CHAMPIONSHIP 


- ■-■■ 




u 


ITS 


4 8OULDER0ASH 


*7 




u 


IIS 


I PSI WARRIOR 


K7 




J 


U - 140 


e up n down 


•■ 




M 


ISO 


7 TAPPER 


K) 




M 


ISO 


8 SPY HUNTER 


M 




M 


ISO 


9 SPY VS SPY 


Kf 




M 


140 


10 CON AN 


Disk 






130 


1 1 SEVEN CITIES OF GOLD 


Dm 




M 


380 


1 1 TOURNAMENT TENNIS 


;,.,.. 




M 


ISO 


1 3 RAID OVER MOSCOW 


K7 




M 


IM 


14 SUMMER GAMES 


DISKIJK7 




M 


IB0T200 


IS KRYSTAL OF ZONG 


k7 




1 J 


H ■ BO 


i * BATTLE FOR MIDWAY 


DISK-K7 




a 


u - roo'iso 


1 f QHOSTBUSTERS 


DISKJK7 




M 


ISO/ 149 


IB BRUCE LEE 


OISKOUK7 




M 


730/140 


leSPELUNKEfl 


DISK 




U 


179 


30 HYPER BIKER 


K7 




M 


90 


11 WHISTLER'S BROTHER 


DI5" 




M 


ITS 


II MR ROBOT 


K7 




M 


1B0 


23 DECATHLON 


DCSK7K7 




U 


130/130 


14 BEACH HEAD 


K7 




U 


1» 


IS BLUE MAX 


K7 




M 


MO 


28P8VTRON 


K7 




1 i 


140 


17 MASK OF THE SUN 


DJSR 




> R 


3*0 


IB VOYAOEUfl 


K7 






14S 


IS CHINESE JUGGLER 


K7 




M 


93 


30 DALLAS 


DISK 




t R 


MO 


11 HOB8IT 


K7 




B 


310 


33 HOVER BOWER 


Kl 




■ 


IM 


34 KILLER WATT 


K7 




W 


110 


IS ZENJI 


K7 




| 


M ■ 1J0 


X AXIS ASSASSIN 


DRW 




M 


180 


37 0NE-ON-ONE 


OiSk 




M 


380 


38 ARABIAN NIGHTS 


K7 




M 


S3 


39 PINBALL CONSTRUCTION 


D'&> 




M 


380 


40 CHOPLIFTER 


MODULE 




■ 


3fi0 


41 HARD HAT MACK 


DBJM 




M 


380 


41ARCHON 


DOM 




M 


MB 


ORIC 1 / ATMOS 










1 3DFONGUS 


K7 






140 


I MEURTRE A GRANOE VITESSE 


K7 






IN 


1AMUDWI 


Kl 




H 


1B0 


4 MR WIMPY 


K7 






99 


SDOOOV 


KT 






IN 


S SUPER JEEP 


KJ 






140 


7HOBE4T 


KJ 




" 


110 


B COBRA PINBALL 


K7 






140 


9 FRELON 


-7 






IM 


10 LE OIAMANT DC L HE MAIXXIE 


K7 






180 


IIMKIMtnN 


KT 






110 


1IP3YCWATRIC 


Kl 






■M 


13TEHORCPOULET 


KT 




R 


IM 


14 LANCELOT 


KT 






IM 


1STERAMHUB 


K7 






110 


IS ULTIMA ZONE 


K» 






M 


17 MRSSON DELTA 


K7 




" 


»s 


SPECTRUM 










IDAJtKSTAN 


KT 






M 


IIMff 


KT 






70 


1BMUCELEE 


K7 






110 


4 ZAXXON 


KT 






110 


5 MATCH POINT 


KJ 




M 


M 


esABncwuiF 


KT 






140 


7 UNOEHWOHLDE 


K7 






IM 


S BEACH MEAD 


K7 






ISO 


9 LORDS OF MWNtGMT 


K7 






IM 


10ATICATAC 


KT 




M 


M 


iiBtvmoH 


K7 




J 


119 


HHOmbT 


K7 




R 


no 


1 3 PAINTING JOE 


K7 






79 


MUMM 


K7 






M 


IS vox 


K7 






IM 


IS 30 MOVER 


K7 






IM 


1 7 INT ERCEP TEUR COBALT 


K7 




R 


BS 


ISMANCHRDfOENRiS 


K7 




R 


1*0 


TEXAS Tl/M 










1 LUNAR LANOER 


K7 


t 


M 


»S 


IDR1VWODEMON 


MOOUU 


A 


M 


110 


3 AMBULANCE 


MOOUU 


A 


M 


110 


4 RABBIT RAM, 


MOOLA.E 


A 


M 


110 


THOMSON 










SAUF SPECIFICATION CONTRAIRE TOUS CES LOQJCKU 
COMPATIBLES MOS TOT AVEC EXTENSION MM ET T07 ? 


KJM 




T 


tAKM.ID'On 


K7 






IM 


am 


K7 




M 


IBO 


1 INVASION 


KT 






1SS 


4 AMBUS 


M. ..I.,. ■ 




M 


*n 


SELMMNATOR 


KT 




M 


IM 


S PULSAR N 


K7 




M 


140 


I STANLEY MOS 


-.7 






140 


S SPACE SHUTTLE SIMLA ATOfi MOS 


KT 




J ' 


MO 


9 VOX MO 5 


K7 






IM 


10 YITI 


K7 






140 


1 1 LASYRtNTHE SUR VIE 


KT 




M 


190 


1? BACKGAMMON 


KT 






170 


ZX61 










i RIOEL 


«. ■ 






99 


3 SCORPIRUS 


.' 






73 


3 INTERCEPTEUR COBALT 


HI 






95 


4CROCKY 


k; 






BB 


3 COBRA 








80 













PC MUSIC et EDITEUR 



PC 1SOO 



Une occasion a ne pas manquer ! Pour le meme prix 
nous vous offrons un piano de poche et un editeur qui 
satisferont sans nul doute. vos dons de musicien et de 
prog ram meur. 

Jean MARTINO 

Mode d emploi : 

PC MUSIC ; ce programme en MACHINE, transforme voire PC en 

piano de poche. Tapez soigneusement le programme (attention aux 

DATA) el taites DEF (space) Entrez I'adresse d implantation (& 

7150 par defaui). si une erreur esl detectee 

ERREUR (1). tignes 2000-2040 

ERREUR (2), - 2050-2070 

Faites ensuite DEF (A), et entrez la duree des notes a produire Le 

changement d'octave selfectue avec les 3 premieres touches du 

pave numenque Pressez "SPACE" pour retour au BASIC. 



EDITEUR permet d'entrer des octets sous lorme exclusivement 

HEXADECIMALE (sans prefixe & ) dans la memoire du PC <HH 

designe un nombre HEXA non precede de & ) Apres RUN le menu 

s'affiche sur impnmante : 

DEF A; entree (2 formules}. apres avoir entre l adresse de depart le 

programme demande : 

OCTET & HHHH : > "> Repondre par un nombre HEXA compns 

entre 00 et FF 

OCTETS & HHHH ; > ? Repondre par une chaine HHH H inom- 

bre pair de caracteres. le programme affiche le check sum), comme 

pour un affichage graphique Pour stopper entrez "S". 

DEF S; vesication, tapez BREAK pour arreter 

DEF D; sauvegarde dun bloc 

DEF F; chargement d un bloc 

DEF G: 2 formats de sortie sur imprimante 

1. HHHH : HH HH HH HH 

2. HHHH : HHHHHHHH check sum (en decimal) 

Ces 2 formats de sortie, correspondent aux 2 formats d entree 



LISTING 1 



10:- HEBOGlClEL 

12:" 

13:" 

1888:" "0=1.7150:8 
=*7180:D=&18 
84:^ = 8.1029: 
INPUT "Adrcs 
se depar-1 :" 
; ft: 8=0*8.30 

1010:S=B:RESTORE 
2080: FOR N=0 
TO 75: READ C 
:S=S+C:P0K£ 
B+N, C:NEXT N 
:IF SODBEEP 
3:PRINT - ** 
ERREUR (1)" 
:EN0 

1020: S^0: RESTORE 
2050:FOR N=B 
TO 47: READ C 
:S=S*C:P0KE 
P*N, C:NEXT N 
: IF SOEBEEP 
3:PRINT " « 



1830: 

2000. 



ERREUR (2) 
:END 

:BEEP 2:PR1NT 
" »* OK. 1 : 
END 

:-'A"INPUT "Ow 
'-ee d, une no 
t« :";F:CLS 
:P0KE A+&6E, 
F:CALL fl'tUB 
:END 

: " 

DATAS 

DATA &5A, &24 
, &BE, &E4, &2C 
,167,8.31,(89 
, 184, 8.5A, (24 
, S.9E, &0B, 8.B7 
, 8,32, 8,89, 8.84 
,8,5A 

OATfl 8.18, 8.3E 
, £13, 8.87, 833 
, 8,83, 8.04, 8,50 
, 8.0C, 8.9E, 81B 
, &87, 8,20, 8,83 
,&01,K9A, 8.18 
,&48 

DATA &71, &4A 
, &74, 8.05, £36 
, 8,88, £09, 8,40 
, &4E, 680, t8B 
, 8.02, &9E, 806 
, 8.9E, 8.32, 8.84 
,8,10 

DATA 8.00, 8,05 
, 8.68, 808, £20 
, £48, £01, 840 
. £05, &FD, 808 



, £FU, 
,&E6, 
, £0A 

2040: DATA 
. 89E, 

2050: DATA 
.B.8F, 
,&A0, 
, £86, 
. £70, 
. £50, 

2860: DATA 
<&43, 
,£37, 
,820, 
■ £25, 

.tie. 

,£18 
2870: DATA 

.8.53, 
,143, 
. £42, 

, £4A, 



£FD, 820 
S4A 

£07, £CB 
£BJ, tr* 
8.97, £8E 
£?E, £77 
£69, £63 
£57, £51 
&4C, £48 
£3F, £38 
£34, £31 
£2A, £27 
£22, £20 
£.18, £1A 

£16, &5A 
8.58, £.44 
£56, £47 
8.48, 84E 

£4D 



LISTING 2 



5: "SHARP PC- 1588 



CO-1985 

eon HART1N0N 



10:" HEBOOGl^IEL 10220 



TEXT :CSIZE 
3:C0L0R 3:LF 
2:LPRINT " * 

* HENU **": 
COLOR 0:LF 2 
:CS12E 2 
LPR1NT "DEF 
A:Entree": 
LPR1NT "DEF 
S:U«ri f ic<U i 
on":LPRINT " 
DEF OiSauveg 
ar*de 

LPRINT 'DEF 
F: ChQr9ement 
■:LPR1NT "DE 
F G:Sort ie I 
mp.":LF 5: 
CLS :END 
"A" CIS :UOIT 
0: INPUT "For 
mat (1/2J :" 
;A:G0SUB 125 
00:GOSUB 135 
00:C=K:ON A 
GOTO 18210, 1 
0230 

O=C:M=13500: 
COSUB 14000: 
PRINT '■OCTET 

K";8»;C*; " 
> £";: INPUT 
KC IF LEFT* 
(KS, l>="S" 
END 
G0SU8 H:P0KE 




^ -rfc 



C,K:C=C*1 
:f>C:G0SUB 14 
000:PR1NT "0 
CTETS £";B«; 
C»i" > ";: 

INPUT 9*: IF 
LEFT* (B*. 1> 
="S"END 

i:S=8:F0R 1 = 1 
TO LEN 8* 
STEP 2:K»= 
HI j* (8*, 1,2 
K GOSUB Hi 
POKE C'INT < 
.•2>,K:S=S+K 
:NEXT l:C=C* 
INT (I>2J 

IICLS :UAIT : 
PRINT "Check 

Sum : ";S: 
GOTO 18238 

i:"S"CLS :UAIT 
8:G0SUB 1250 
0:GOSi'B 1350 
0:C=K 

i: WAIT 0:O=C: 
G0SU8 14080: 
L=PEEK C: 
WAIT :G0SUB 
13880:PRINT 
"OCTET £";B* 
;c*;" > j.";l 
• 

l:C=C*l:C,0T0 1 
8270 

I: "D"CLS : 
GOSUB 14500: 
GOSUB 12080: 
K*=E«: GOSUB 



'J!&£S 



13580:E=K:K* 
=F*:G0SUB 13 
508: F=K 

0:CSAUE r1R»;E, 
F:EN0 

B:"F"CLS : 
GOSUB 14508: 
GOSUB 12000: 
IF E«="'0R F 
*=""CL0AD HR 
*:END 

0:K»=E*:GOSU8 
13500:E=K:K* 
=F«: GOSUB 13 
508: F=k: 
CLOAD I1R*;E, 
F:END 

0:"6"CLS : 

GOSUB 14500: 
GOSUB 12000: 
K»=E»: GOSUB 
!3500:E=K:K« 
=F»: GOSUB 13 
588: F=K 

0: INPUT "Forma 
t (1/2) :";A 
:LF 2: COLOR 
2:LPRINT : 
LPRINT R*: 
LPRiNT : 
COLOR 

0:FOR 1=ETC F 
STtP 4:S=0:O 
=]:G0SUB !48 
30:LPRINT B* 
IFOR 
J=1T0 1*3 
:L=PEEK J: 
GOSUB 13808 




: LPRINT L*;. =CHR* (48*Y* 

IF A=1THEN 7*(Y>9)>* 

LPRINT CHR* CHR* C48+Z*7 

(32); *CZ>9>): 

18450: S=S*L: IF JO RETURN 

FNEXT J 13490:REn 

10460: IF O^lLPRlNT 13500:REn CU. MEXA 

CHR* (32>: ->DEC1 

NEXT I:EN0 13510: REtl 

10470:LPR1NT "=";S 13520:CLS :UAIT 0: 

:NEXT 1:EN0 J=255*(LtN C 

10480:REn ======== K*>=4)*1 

.,=====, 13530:GPR1NT K*:k= 

10485:REn = S^S J*P01NT 0* 

PROG. = POINT |: 

!0490:REn ======== RETURN 

======= 13590: REM 

10495:REt1 14000:REH CU. 2 OC 

12000:REn -ADR.m- TETS 
14010:REn 

12810:REn 14020:WAIT 0:n=lNT 

12020: INPUT "Adres C0^256):L=r: 

sc Debut :";E GOSUB 13880: 

*, "Adreste F B*=L*:L=0-25 

in:";F*: 6*H:G0SUB 13 

RETURN 000:C*=L«: 

12498:REH RETURN 

12500:REn -ADR. "2- 14430:REn 

1 4508: REP Nfir 

12518:REn 14510:ftt"H 

12520: INPUT "Adret 14528: 1HPI 

se Depart:"; e la rout if* 

K*:RETURN 'JR*: 

I2590:REP RET'jRN • 
:REH CO. DEL'I 

- >HEXA 
:REH 

:Y=1NT CL'16) 
:Z=L-16 «Y:L»_ 

121. 



OPERATION PUPINESKOF 

ConnaiSSant VOtre gout du sacrifice, voici Cher pilote de dangeureuses et tentez de trouve. ta position du but de votre mis- 
la "LAYOR AIR FORCE" une mission des plus peril- sion. Lordlnateur tx)mbardera avec un totate reussrte lobjectit d6- 
Ipii-so a la mp^nrp rip uotrp hprni'smp couvert. Voici la liste des dilferenls messages 
leuse a la mesure ae voire neroisme. Nouvelle position ? : rentrez un chiffre entre 1 et 9. appuyez guel- 
Frederic LEMARCHAND ^ ues secondes sans EXE. 

Navigation enor • : a la suite dune erreur, lordinaleur calcule de 

nouvelles coordonnees 

Mode d'emploi Ravitail (1) OK 1 premier ravitaillemenl, vous beneilciez de 25 

Votre but est de detruire un objectif enneml. en evitant si possible unites de fuel. 

les tirs de D.C.A. les attaques ennemles et sans oubier de vous Ravitail (2) OK ' ; Deuxieme ravitalllement. vous beneliciez de 30 

ravitailler par deux fols. Lancez le programme par Ft P0 A gauche unites de fuel 

apparalssent les coordonnees de votre appareil. a droite les unites Reservoir vide a sec. vous avez perdu 

de fuel restant (30 au depart). Tapez un chlftre entre 1 et 9 pour Crash ! : plus de fuel, abattu par la DC A ou un appareil ennemi 

indlquer votre nouvelle position. Ces chiftres fgurent les directions OK. jexecute I : calcul de nouvelles coordonnees et de leurs impll- 

possibles, le chiffre 5 permet le vol stationnaire. Si vos coordonnees cations 

son! impossibles, lordinaleur vous supprime des unites de luel el Attention DC A ' un obus vient d eclater a proxlmite. vous perdez 

vous choisit aleatoirement de nouvelles coordonnees Avant de sur- un peu de fuel 

voter votre objectif. il sera necessalre de vous ravitailler deux fois On doit combattre ' appuyez sur une louche pendant quelQues se- 

Place sur la bonne case dabscisse 5. vous recevrez 20 unites de condes sans taire EXE 

fuel et sur la bonne case de la zone de ravitalllement 2. vous rece- Objectit detruit ' vous avez abattu I avion ennemi 

vrez 30 unites de fuel. Si les obus de DC A eclatent a proxlmite de Nous sommes touches ! : par la DC A ou un appareil 

votre avion, le fait de devoir accelerer vous fera perdre quelques Zone dangeureuse ' vous perdez un peu de luel 

unites de fuel. Si vous survolez des appareils ennemis, lis se lance- Mission accomplie ' vous etes un AS ' 

font a votre poursuite en essayant d'atteindre votre altitude 1500 Unites de fuel perdues : 

unites) Vous venez apparaitre voire viseur ainsi que I altitude de emplacement. 1 unite 

lavion ennemi. celle-ci superleure ou egale a 495. le signe central Erreur. 6 unites 

du viseur sera emptace par un "b" (but), tirez en appuyant sur une Tir de DC A manque. 6 unites 

louche quelconque (20 ennemis sont en permanence sur le theatre Combat-vainqueur. 5 unites 

des operations) Vainqueur du combat, dingez-vous vers les zones Zone dangeureuse. 4 unites 



18 VK :WII Bt[l=2 >FI)EL:'iZ 

49 : K= . 1 : FOR fi=8 111 BIT lltPRT "KO 

10 19:ES8 12 WELLE POS1II0H 

28 Bin)=R:6SB 13:1 r" 

(8t2B)=8tHEXI « 12! IM=K£Y:IF UJ» r " 

38 6SS IJiMUF C 



>3 IHEH 38 
48 ESE I2:P=R:1F P 

Mi IF P(? IHEH 

61 
SI GOTO 48 



ESC 15 

288 IF HSS <X-H)=r, 
IF RES (Y-6)=l; 

sseis 

218 FOR fl=8 TO 1$ 

MIT 45tBSB 14 221 IF Ji=fl(R)ilF V» 

:R=|:6010 148 H(Rt2B);IF X>2; 

1FX<3UFY«:S 

SB IStSSE ICSO 

TOD 



131 6010 111 

141 IF X>9:IF XilO: 

IF Y>6llFY£15 
THEN 1?8 



IF (INT H)«l;H= 
ll*l:PRT 'RRVITfl 
IL.(2) 0K!":2=2 
»38 

28IIFX=PllF Y=0!I 
F H=l.l;6SE li 

298 2=2-11 IF 2481 PR 
T "RESERVOIR VI 
IE •"••EOTO II 

386 EOTO 98 



61 ESE I2:»*Y=1S 158 PET "HRVISRT10H 



Z=38 
78 ESE 12: H=R 
88 ESE I3:L=«:1F L 

a THEN 86 
98 6SE I2:J=R:6SB 
I3:I=Q:ES8 12:H 
=RtESB 13:6=8 
111 RSIT 18IIPRT •( 

)";X;" i";Yt" ( 



ERROR !":2=2-6 
168 ESB I2:X=R:ESE 
I3IY=J:60T0 98 



238 IF X=fliR)!lF Y= Pi: 75 STEPS 

S(H*2B)iSSB 16 18 HRIT 38:C--18:F0 



241 HEX! A 
258 IFX>2lIFX(9il 
F Y(6;6SE 18 



178 IF S;JilF Y=I;6 268 IF X=5;IF Mil 



0TOI7 
188 IF X=H;IFY=6IB 

OT0I7 
198 IF BBS (X-J>l; 

IF RBS (Y-I)=l: 



F (FRftC H)«IH= 
»«:PRI "RRVITfl 
IL. CI J 0<!":Z=Z 
♦25 
278 IF X=H:IF Y=18; 



S 8=11 TO 19:C= 

C-l 
28 PRT CSR C!'("!C 

SR 16!"|-;CSR E 

;")";:HEXT E 
3! PRT CSR Sf'CRftS 

H...!':M 

2! 24 s;ef; 



18 «=IHT .EflHMll! 

I IF R=l IHEH 18 
28 RET 
P3: 24 STEPS 
18 6=IHT iRRHM16) 

UF 0=1 THEN II 
28 RET 
F4: 182 STEPS 
II PRT CSR 21 "OK.. 

. J EXECUTE !": 

S=«:T=i:IF l»=" 

l"!T=l:S=-l 
21 IF UJ="2";T=1 
31 IF lil="3";T=l:S 

=1 
41 IF 0J="4";S=-1 
51 IF 0I=V,S=1 
66 IF Ut="7*;S=-l: 

T=-l 
71 IF I1S="S"IT=-1 
38 IF U«="9";S=i:T 



=-1 
91 X=X»S:Y=YfTiRET 
P5: 32 STEPS 
II PRT "RTTENTIOH 

i.C.R. !":2=2-6 

:RET 
P6t 184 STEPS 
II PRT "OH DOIT CO 

IBRTTRE !":F=48 

ItURIT 8 
21 F=F*!NT (RBNI»I 

8): IF F)586lltfil 

T 45:60TO IT 
31 IF F»495:RRT CS. 

R 5I"( -B- )";F 

:IFKY«"";2=2- 

5:60TO 78 
48 IF F»495 THEN 2 

8 
51 PRT CSR 5l"( -* 

- )"!F:1F «Y«" 




17 

61 SOTO 21 

71 BRIT 45:W "OB PS: 33 STEPS 

JECTIF MTRI1IT 18 PRT "ZONE 

!":«£T REUSE...!' 

: 38 STEPS 4 : RH 



SORHE -P9: 44 STEPS 

"1601 18 HRIT 5*PRT "B 
SSiON PUFlHESf.C 
FVRCC0HPL1E ! 

DRN6E ":EHD • 

1&Z- 



******* 

■ ••■*■■■■■ 



-- zones »W6rtfuses 



. ZM<£ X &"ViTA('ufl*{ r *T 1 



METEOR MISSION 



Vide spatial, mon oeil ! Lespace aujourd'hui n'a jamais 
ete aussi encombre. 

Jer6me PASCHEL 

Mode d'emploi : 

Reservez une REM de 583 caracteres el avanl lancement faites 
GOTO 9500 pour I implantation des codes MACHINE Pour le reste. 
les regies sont mcluses 




Kg«¥ft e S N e Si , 85fcS°?K5tfsK i 

10... score 0000 tir 900 
25. . .ener&ic ■ ■ 



107. 


, * 


leo. 


.A 


7020. 


. ] 


9070. 


i 


9134. 


9140. 




9496. 


.M 



rem 
copv c clcbr^ rnd I rrnd'TTe't urn 

"J. PAUSE E£RNDi6 ,/4Uf|RND77 I UN 
PLOT U«RND RETURN ■ GOSUB ""^RNDC 
3UARND RETURN RUN CV RETURN TO C 
""' !C' ,fc /«uiRN0 RETU 




- .UBRNbRET'. 

M»RNDJ i *70fit CL5 
E%RNDj5 ^*-LEN 

CTURN — 



?C0S I 
B KSRN0-> 
flSN ABS 



40 LET U«U-1 
100 LET P»33*PEEK 15E18* 236 *PEE 

K 16519 
103 TOR F»0 TO 20 
107 POKE P.CODE B 
106 POKE P,CODE "A' 

109 NEXT F 

110 LET T=PEEK 16583 

120 IF T)«5 RNO Ul<5 TMCN LET U 
«u+2 

123 IF T>«5 RND UK; 10 THEN LET 

01=3 

125 IF T>=10 RNO UloW THEN LE 
T U»U+3 

130 IF T> = 10 THEN LET Vl«10 

134 IF -Ja© THEN PRINT AT 23,11, 

142 IF <J«0 TMCN GOTO 8000 

150 FOR F«l TO U 

160 PRINT RT 23.10*F SB 

170 NEXT F 

130 GOTO 30 

4000 REM INITIALISATION 

4.010 FOP F = 16524 TO 16530 

4020 POKE F ,0 

4030 tIE-T F 

4040 POKE 16523, 1 

4050 POKE 16529.27 

4060 POKE 16522, 1 

4070 POKE 16520.0 

4080 PAUSE 4E4 

4090 CL5 

4100 GOTO 5 

7010 LET fiS = "LE COURAGE, LA FORCE 

.LES DIEUX SONT RUEC UOU 

5 UOUS fiVEZ REUS5I 

J Hu_ HUMAIN N" R ETE R Lfl M 

RUTEUR ..." 

7020 LET A-oR*.*.' 1 U0U5 RUEZ 

LE CMOIX ENTRE II RETBOUUER 

UOTRE FAMILLE B RETOURNER 

ORNS L"'E3PRCC' 

7030 LET X»8 

70*0 LET Y-0 

70S0 FOR F>1 TO LEN R* 

7060 PRINT RT X,V.fl|(Fi 

7070 LET Y«Y*1 

7080 IF Y>31 THEN LET X»X*1 

7090 IF Y>31 THEN LET Y«0 

7100 NEXT F 



TE " . ARRET 

7120 IF INKEY»= 2 THEN PRINT RT 

18,2.'V0TRE COURAGE V0U3 MONQRC 

7130 IF XNKEYf*"2" THEN GOTO 400 



2,1," COMME 6EAUC0UP DE NAUIGATE- 
UR5 PERDU5 '.'OUS AUEZ ECmOUE ET U 
OUS ETE5 CONDAMNE A CRRER 

POUR TOUJOURS DANS L""UNI 
VERS " 
8020 GOTO 4000 




JMSSII 



jTEP E^RN0>3 ^*-LEN GOSUB 

ijORND RETURN BCCu £^4 UNPLOT 
uEN i FOR ECRNDJ?", FAST /57 . 
CLEAR FAST 5GN LPRINT >t"5»4 PRI 
NT LN BPI i P_'* RETURN IK PLOT ECRN 
0"" ,-^lBRND,?7< ( IF £\RNDLN gp 
IAC5 2U RETURN SK^UBRND GOSUB ? 
CRNOS" 1 , FOR S3 , i i'-Fi IF EERNQ. 
? f7/"VW?F PRINT E£RNO>? , §RNDUM 
■RNOuORNOMlRNOLH .fiPiV ECRND.i ^ 
. w-ElRND) LLIST rB4|M«RND/1 7 ■ 
ORD 0B5jRNPl*RND RETURN ? — T 

^l CLEAR i(FnD*| GOSUB 
NDflASN ABS RND RETURN 
RND GOSUB ^BRNQBRSN ABS RNDTAN 
EERNO) LLIST ", jT0#7 C CLS m»RnD" 



GOTO 9000 
LET U1«0 
POKE 16418,0 
_ LET V-3 

10 PRINT 



35 IF PEEK 16523-15 TMEN GOTO 



RUNES 



Au gre de votre faniaisie. 1'emptoi de cet ulilitaire per- 
mettra d'enrichir vos programmes par quelques beaux 
ou vilains caracteres 

Jacques CATTELAIN 



* *i HP*' 2333 

720 IF kti-LHfi* 127) IHEN tnc-u v n 

t-CHft* 2 33 > 

?JV IF- kti-LMRt*. 1«2;> THtN RETURN 

740 GOTO ult) 

760PRINTBI. CHR»X 22 '♦CNR* y t 

770 LOCATE*!. 1.1 PENtl.l PPIN1*1." 

col".* 

780 UXATE»1.1.J ftWJ.I PRIH111." 

llft-.f 

--*} ORIGIN 80.19£ 

800 IF •nc-i uufu 028 

die PLOT 2«x-l.l-'2*y>«nc 

Qtt RETURN 

ItJAi U1NUUW*U. I .4*1. 1 -rt HK1MI i HR» 
I i!2 <»CHR»< B ) 

i04w pmrer e pen i 

ltfW LOCMre !«.*; prini "hemi.ici -,mi i 

ON SYNBOLE" 

to©a CLsti ft.mt.1 CLSti 

i-i.'y ORIGIN 167,167 

10&« LOCrtTE 6-5 PEN i PRINT "totw 

■ lrsn«* dec fi«-' 

1090 FOR U9-1 TO 6 

1100 FOR col»0 10 .' 

1110 *-16*col *«16«' lia-1 • M«JVE *, 



/i 



9020 PRINT AT 16 , 2, " . . .PERDU DAN 
S L" 'UNIUERS .... 

9030 PRINT ■' A BORD DU METEOR 

yoya deuez regrgner la 

TERRE EN AFFRONTRNT MILLE 

OBSTACLES" 
9040 FOR N=0 TO 200 
9042 NEXT N 

5050 CLS 

9060 PRINT RT 3.0 . ***♦»*♦****** 

♦*#**«#**♦*+*++♦***+* **«COMMANDE 
3 DE L""R5TR0NEF#»«»»**+*»*»*«»* 

9070 PRINT AT 9,0, " 
DROITE 
GAUCME 
UR TIRER " 

9080 PRINT ','OUS DEUEZ UOUS RAU 
ITAILLER EN TOUCMANT LES RESERU 
OIRS -X'' SI LE CARBURRNT E 
ST A ZERO L-'-RSTRONEF S 

•"IMMOBILISE 

9100 PRINT AT 17,7, " ...RTTENTIO 
N... LES MISSILES SONT L 
IMITES A 900 ET SONT UTILISABL 
E5 0""RUEC UN RSTRONEF OUI TRAU 
ERSE UNE ZONE ■■ .<■ BLANCM 
C )>.>)- 

9101 PRINT RT 17,7," ...ATTENTIO 
N... LES MISSILES, LIM 
TTES A 900 NE SONT UTILISAELE 
5 O-'-flUEC UN ASTRONEF Oul TRBU 
ERSE UNE ZONE ( < < < < BLANCH 
E >i>>y 
9110 PAUSE 4E4 
9120 FOR N*15 TO STEP -1 
9130 PRINT RT 1,0; "■ _■ DEPART 

ORNS -.N, " 5 ■" W* 
9140 PRINT RT l.Q,^ ■ OEPART 
DRNS •' , N, " S II 



9160 NEXT N 
*170 CLS 
9200 GOTO 5 

9500 REM 4*»*» #«*♦*§♦»**• * #•*• 
CMRPGEMENT Ou JEU 

9510 FAST* 

9550 LET R*s"0O000500AC'453DOO0i0 

20000000016000000000 10000 1700170 

0000034 34O0OO ie 34 1BOOOO8639O6S06 

i3B4 5OE430aoeoe4BD33S08OS09B868O8 

03A-3A3B3007aO" 

9552 LET A*»fl*-*"07S8B0963B96e33e 
698BB98A3O929C933A8B4O3C06FFOCFD 
2 10040 10F9FEOF20F22ROC4O 112200 19 
0620 3AeD4077a310FC3A8340FEO8ED4E 
544023 1F3A2640FE" 

9554 LET Rt=At4"F728©6FECF280C18 
12 3A6440FElD2808O3ie0;33A3440FEOO 
230 10BE&4 334 4 02A0C 400 1 120209E04C 
■=■44009223640 3A3B40FE0 7 3E2638023E 
A677^B3A3D407723■' 

555^ LET fl»»A» + - , 237711210019772B 
772B772 33A264OFEFD2O4F3A3A40FE00 
23432 A0C401 11000 197EFE9C28 16F E30 
2O0E3E0O323H4006032 3369C10FB162A 
3D77180536A52B13" 

9553 LET A» = A» + ' , E02R86401 12 1O0OE 
00O6OPC600ED52 3A8D4OFE30280C360E 
OC7920FC36OOC6O010EB2A0C40H7202 
19E5O6212310FDE5O1E10E12OE217E12 
L82ei0FA0D20F5CD" 

9560 LET A<aA(t 'B64206004FF* . }30 
F52AOC401 14300 1909C603118E4O.s-»7 
23131OFq2A3640CDB642CB3F3CFE JD^O 
ir4 73RBC40EC'5e0C40214 30019EB2 11F 
00191213772B10FA- 

9562 LET A«aR»*"2A0C4Ol 10F00197E 
FEH523043C?7 13Oa3E9C772B7E3C77FE 
Me23F52HOC4OllOF0Oi97eFEA5205B2B 
7EFEH52O552B7EFEA52OO7 3A8B403C32 
3B40 3R8D403289*a" 

9564 LET A«aA»* CDB6424F06002A0C 
40091 14300 19 363D2AOC4O11E202197E 
FE962 30CFE082005 323340 13052 3 13EF 
36302 13 7403 A3e4 OF E OF Tf. 1105004-19 
10FDlieC40OlO5OO ' 

9566 LET fi*«fi»+"ED8O2A36407EFE3D 
2816ED4B8940B9CAD24OFE00CA&24OED 
4eBC'40B9CHC'24 0C92HOC4011E2021906 
11 369623 10F6323340C3D2402 12 14034 
^£2ect. _ ElFCE2FCB" 

9563 LET A«=A$*'-3FC900OO" 
9600 FOR F«l TO LEN A«-l STEP 2 
9610 POKE 16514* (F-li .2, 16*C0DE 
R*iFi*CODE A*iF«lt-476 
9620 NEXT F 
9630 SLOU 
9640 STOP 

9998 SRUE "METEOR ■ 

9999 RUN • 




AMSTRAD 




VOiC l LA 

Solar* ON 0*/ 
DC LA $EHA<#e 




PAS D£ SoPVE ! ^ sJk 
/iW;maMa(Tf¥4Pb5ic*'W^' 



199 IMX 2.1.20 INK 3.17 PMPEK <d h-E 

N 1 

160 GOSUB 1530 

li"0 IF ch-1 TMEN GttoUfc 20J0 

180 IF ch-1 GOTu 320 

J00 MODE 1 

210 DEFINT cm. l.f.x.n DEFSTk b.k 

DIM tot<8» 

'££» glND0M»1.3,y,e, 12 UII«>0U«2.3.4 

0,18,25 

230 «nc-2 x-1 *-l Pnt-CHRX23S; b« 

laCMRK77 

240 SYMBOL 255.255. 12*. ft. 6. tf.0, 12* 

.255 

2S0 ORIGIN 156. 156 

260 DRrtWR 0.134.3 [*HMR U4,0,J DK 

RUR 0,-134.3 WfrtUR -134,0,3 

288 GOSUB 330 

290 GOSUfc 1030 

300 GOSUB i&M 

329 IF INKEY( 1B^«0 THEN ULS'END EL 

SE GOTO 32)6 

530 LOCftTE 13.2 PRINT "DESSIN SYMB 

OLE- 

540 CLS»2 PEN»2.3 

350 L0CRTE»2.3.1 PR1NT»2. "C" iCHR«* 

240>," "iLHR»<.241 ).- -.CMKW^iJ." 

360 PRlNT«2,CHR«243>.-3 Four <*e I 
*c. cur»»ur" 

370 L0CRTEi2.3,J PRINT#2, "tLOPYJ 
mirtut It Point" 

500 L0O»TE»2.3,5 PfclNr«2. "CDELJ 

•' * jc« l« Foint" 
590 LOCflTE«.3,7 PRIHTtt."UJ 

4uand G'Cftt f ini |" 
600 MINDOWI0.il. 19. «. 16 PRINT LHR* 
< 22^CHRK1> 

610 PEN «nc LOCATE h,* PRINT ent G 
OSUB 760 

628 •nc»2 PEN «nc Pnt-CHK«* 255 > 
630 h«i>INKEY* IF k*i-"" GOTU 6sd 
640 «nc»0 LOCATE k.m PEN «nc PRINT 

Fnt «nc"2 
6S0 -•-<*■ 1 RHLi h*l«.HR»< 243j '-< 1 m 
ND k«l-CHR*t242 " 
660 IF . ■■) THEN ,-y PR1NI bcL 
678 IF -=o THEN x«l PRINT ML 
680 »-**i. 1 RNO fcti-L** 241 » j-( J R 
ND k*i<CHR«< 24mi^ 
690 IF y/B THEN ,-» Pkihi Ml 
700 IF k-0 THEN k-1 PRINT Ml 
718 IF fc«l-CHR».224 f THEN «nc«i p n 



•.7-COl 

1140 NEXT col 

1150 LuCHTE 22,16-119 PR1N1 USING 

•■••#", tOt< 119J 

1166 LOCHTE 27,16-li9 PRINT "%"*Hk. 
* * - U9;,2; 
1170 NEXT 1 10 
1190 WINDOW bUHK" 0,<: KEN 1 
1200 LOCHTE 5,1 PRINT -«M*ct. di- 
•ct« touch* <o'n>" r»Pl«INk£Y« 
1210 IF r«Fl-"o" THEM LOCATE e-,3 P 
RINT "Fresw c«tt« touch* ". COT 
1340 

1220 IF r#PlP"n" GOTO 1246 
1230 GOTO 1200 
1240 LOCHTE 5.3 PRINT "aff«ct, mm 

tro C»r#Ct. tO'fij" r#P2"INKEVi 

1250 IF ^#*'2- , ■o , ' GOTO 1280 

1260 IF r«F2-"n- GOTO 1300 

1278 GOTO 1240 

1280 LOCATE 2-5 INPUT "««. du C*r 

let. ' >31 I- ' 256 ' ".tou 

1*90 IF tou(32 Oft tou/255 GGTu 128 

ELSE GOTO 1360 

1300 LOCHTE 9.7 PRINT ".jr. *otr« J« 

■>ln 'O/nC r»fj-IMkE'r* 

1310 IF r«P3-"o" THEN ERHSE tot GO 



TO 200 

1320 IF r«F3-"n" THEN RETURN 

1330 GOTO 1300 

1340 k»i>lNKEYf IF k«la"" GOTO 134 



1356 PRINT "",k«i,"'", :tou-RSCU* 

1360 svw-svM+1 •nrtftwpt.l »tou 

1370 FOR «-l TO 8 

1380 tnri.nni.fl -»tvt' ,--* • 

1390 NEXT « 

1400 GOTO 1300 

1538 Pr-CHR* 143J 

1540 FOR c-1 TO 18 REHD I LuCHIE I 

,1 PRINT PrNEXT c 

1550 FOR c«l TO 17 REHD 1 LOCHTE I 

2 PRINT Pr NEXT c 

1560 FOR c«l TO 13 REftD I LOlhTE I 

3 PRINT Pr NEXT c 

1570 FOR c-I TO 13 REf* 1 L<> Hit I 

,4 PRINT Pr NEXT c 

1580 FOR c-1 To 18 PEHD I LOChTE I 

5 PRINT Pr NEXT C 
1590 FOR c=l TO 15 REHD 1 Lui-rtlE I 
.6 PRINT Pr NEXT c 

1608 FOR c=l TO 17 REHD I LOlHTE I 
.7 PRINT Pr NEXT c 
1610 FOR c-1 TO 18 REHD I LOCATE 1 
.0 PRINT Pr NEXT c 

1620 RESTORE 17w FUft c»l TO 18 RE 
mO I LOCHTE 1.9 PRINT Pr NEXT c 
1630 DHTR 7,8.9.10,13.15. 16-19. t '0. 
22. 25. 26. 27. 26. Jl, 32. J3.J4 
lt>4« DHTH 7>9< 10.13. 13>1&<I9<2b«22 

23/26.27.20.31/32.33.34 
1650 DHTH ,',9.10.13.15,16,19.20.22 
.25.26,31-32 

1660 DHTH 7,9. IS. 15. 16.19. £».£\.££ 
.23.26.31.32 

1670 DHTH 7,8.9-10,li,15,16,ly.2U, 
21 . 22, 25, 26,27, 31 . 32. *3. J4 
1660 DHTH 7.9.10.13.15.1e..ie.20.2l 

22-25.26.32.33.34 
1690 DHTH 7,9,10.13.14,15.16,19.21 
.22.23,26.27,28.32.33 S4 
1700 DHTH 7.9.10.13. 14. 15. lb- 19-1 
•22.25.26.27 2&. 31.32- 3J. 34 
1710 PEN 3 

1720 LOCHTE 4.13 PRINT "L«» runtl 
*tn»Tit 1st C4r«ct*r«»" 
1730 LOCHTE 4.15 PRINT "^«» ancivfl 
* «lPh#b»t» 9«r»»n»fly»6" 
1740 LOCHTE 4.17 PRINT "•t »c*rrtJir, 



1760 LOCHTE 4,21 PRINT "Pouvoir mt 
9l4u«,d'ou l«ur no*) Qui" 
1770 LOCHTE 4,23 PRINT "*i9mfi« 
'»w*t«r», ncrf. ' ." 
1780 PEN 1 LOCHTE 13,25 PRINT "Pr« 
>ft«r CENTER]" 

179B IF INKEYU8>-0 GOTO 1800 ELSE 
GOTO 1790 
1800 CLS PEN 3 
1010 LOCATE 2,2 PRINT "C* pro9r«mm 

* P«rPMjt t*t owftftinrr <to" 

1620 LOCATE 2. 4. PRINT *nouv«4ux c* 

r»ctir»«." 

1836 LOCATE 2.6 PRINT "L« MMoritJ 

tlon ft* f*l* »ti donnant It" 

1040 LOCATE 2,8 PRINT "coo* du c«r 

icttrt Ctrttr* 33 tt 255 < ou" 

-1050 LOCHTE 2,10 PRINT "tn Pr«ss<n 

t 1» touch* dturtt. 

I860 LOCHTE 2.12 PRINT "Le* cartct 

•r*« d*rims p*uv*nt *lor»" 

1870 LOCATE 2, 14 PRINT '«trt afftc 

M> ou *«uv*9<rd*> sur" 

I860 LOCATE 2.16 PRINT "cusfttttt.d 

• ni tin f ichitr choisi." 

1890 PEN 1 LOCATE 12,21 PRINT •» * 

* oPtion * « *" 
1900 LOCATE 3,23 PRINT "o*i»in <d) 

ou ch«r9*««rit fichitr <c>"; 
1910 r*P>INKEY« 
1920 IF r*P»"d" THEN RETIJRN 
1930 IF r*P«-c" TMEN ch-1 RETURN 
1940 GOTO 1900 
2030 IF ch*l GOTO 2330 
2046 MODE 1 PEN 1 LOCATE 14,2 PRIN 
T "SAUVEGARDE" 
2030 IF a*i»0 GOTO kmii 
2060 PEN 3 LOCATE 5.4 PRINT "List* 

d*t c*r*ct*r*» r*d*finta" 
2870 LOCATE 1,7 
2080 FOR »-l TO -, 3 m 

2090 PEN I PRINT USING "••■" .*w t 
.Ij. PRINT " ", 
2100 NEXT • 

2110 LOCHTE 8,19 PEN 1 PRlMT"s«oi-e 
94rd4 CMsttM -o-n>" r«P5>lNhEY« 
2120 IF rtP5-"o" GOl'J 2180 
2130 IF rtP5-"r." GOTO 2158 
2140 GOTO 2110 

2150 LOCHTE 7.21 PRINT "i t cwact 
trt* if ftct** * 1" 
2168 fop *=i ro ivM CO&UB iinv HEX 

T t 

2178 GOTO ^490 

2100 LOCHTE 2.21 INPUT "HO* du mc 

hl#r < ■■ 16 C> ".rtc 



2190 rtc""!"»r«c lo-LtN-rtc< IF 
■16 GOTO 2180 

2200 LOCHTE 3.23 PRINT "Preaatr [R 
EC3 t CPLRY3 Puj» CENTERJ" 
221B IF INKEYi. 18^*0 GOTO i&v ELSt 

2210 
2220 LOCATE 1,23 PRINT CHft»c*0,» Op 
EHOUT rtc 

2230 FOR t-1 TO swm 
2240 FOR c«l TO 9 PftlNTt9, tor. e.c . 

NEXT c 
2250 NEXT t 
2260 CLOSEOUT 

2270 LOCATE 2.23 PRINT "fichitr •■ 
.RIGHTKrtc, lo-l J»"' »»-jvtr9*rdt" 
GOTO 2490 
2280 LOCHTE 7.8 PEN 3 PRINT "Pas d 

• Ciricttnt rtdtftnis" 

2290 LOCATE 14,15 PEN 1 PRINT "H 

IENTOT ! 1 " GOTO 2490 

2300 SYMBOL tnr<t,l ).«nr( t.2 ».tm 

• ,3), tnr( t,4 >.*nr( t.5>,trw * ■ 6 . .. 
r( *, 7 >, tnrt • , 8 ) . tt»r( t . 9 J 

2310 RETURN 

233B CLS LOCATE 15,1 PRINT CHR*. 15 
0;.STRINGK7,CHR*:i54l-,CHR»' 15b.' 
2340 LOCATE 13.2 = PRINT CHR»X!49>.- 

RUNES "jCNRK 149' 
2330 LOCHTE 13.3 PRINT CHR«<14r',s. 
TRINC*<7,CMP»< 154 jj,CHR»K 153^ 
2360 LOCATE 13.5 PRINT "CHARGEMENT 

237B LOCATE 2,7 INPUT "noM du tich 

Itr (<16 C> ".rtc 

2380 rtc*"' '*rtc lo»LEN<rtc> IF lo 

>16 GOTO 2370 

2390 LOCATE 7,9 PRINT "Prt.ttr CPL 

RY3 Puis CENTER]" 

240B IF INKEY(18>«0 GOTO 2410 ELSE 

GOTO 2400 
241B LOCATE 1.7 PRINT CHftf*20> OPE 
NIN rtc 

2420 LOCATE 4,21 PRINT "fichitr 
iRIGHTKrtc.lo-l >,"' rtch«r9t" 
2430 LOCATE 7,23 PRINT "* X c«r*et 
mm nfK'.ft * *" 
2440 LOCATE 10.25 PEN 1 PRINT "Prt 
Mr CENTER] -•JFIN" LOCATE 3.y 
2430 WHILE EOFt>-i 
2460 FOR c«l TO 9 INPUT»9. mrw. t .c> 

NEXT c G0SU6 2300 
2470 PEN I PRINT CHR* enr- t-1 >,.' 

'. MEND 
2430 CLOSEIN RETURN 
2490 LOCHTE 10,23 PEN 1 PRINT "Pr* 
»**r CENTER] ".-FIN" RETURN • 
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PRINCESSE 



Prisonniere de spectres dans un lugubre chateau, votre 
aimee la princesse Aurore. a-t elle raison d esperer en 
voire secours ? 



SPECTRUM! #*! 



Marc RICHARD 



Mode d emploi 

Les regies sonl mcluses 



5 FOR [1»USR "4" TO USA »"*7 
AEAD a POKE r, ,a. nEaT n 

9 REM 

10 data bin 00011000 

n data bin 00011000 

is data bin 00011000 

13 oftTfl bin 00111100 

14 DATA BIN 01011018 

15 DATA BIN 00011000 

16 DRTR BIN 00100100 

17 DRTR BIN 01000010 

18 REM 

£0 DRTR BIN 10011001 

21 DRTR BIN 01011010 

22 DRTR BIN 00111100 

23 DRTR BIN 00011000 
24. DRTR BIN 00011000 

25 DRTR BIN 00011000 

26 DRTR BIN 0010O10O 

27 DRTR BIN 01000010 
26 REM 

30 DRTR SIN 00011000 

31 DRTR BIN 00011000 

32 DRTR BIN 09011000 

33 DRTR BIN 00111100 

34 DRTR BIN 91011010 
33 DRTR BIN 00111100 

36 DRTR BIN 01111110 

37 DRTR BIN 00100100 

38 REM 

40 DRTR BIN 11011101 

41 DRTR BIN 11011101 

42 DRTR BIN 00000000 

43 DRTR BIN 01110111 

44 DRTR BIN 01110111 

45 DRTR BIN 00000000 
45 DRTfl BIN 11011101 

47 DRTR BIN 11011101 

48 REM 

50 DRTR BIN 00111100 

51 DRTR BIN 01111110 

52 DRTR BIN 01011010 

53 DRTfl BIN 01111110 

54 DRTR BIN 01100110 

55 DRTfl BIN 01111110 

56 DRTfl BIN 01111110 

57 ORTR BIN 01011010 

58 REM 

60 DRTfl BIN 00111100 

61 DRTfl BIN 01111110 

62 DATA BIN 11011011 

63 DRTR BIN 11111111 

64 DRTR BIN 01100110 

65 DRTfl BIN 00111100 

66 DATA BIN 00100100 

67 DRTR BIN 00111100 

68 REM 

70 DATA BIN 00111100 

71 DRTfl BIN 01111110 

72 DRTR BIN 11100111 

73 DRTfl BIN 00000000 

74 DRTA BIN 11100111 

75 DRTfl BIN 11111111 

76 DRTfl BIN 11111111 

77 DATA BIN 11111111 

78 REM 

80 DRTR BIN 09011000 

SI DATA BIN 00911000 

82 DRTR BIN 00011000 

83 DRTfl BIN 00111100 

84 DRTR BIN 01001110 

85 DRTR BIN 01011110 

86 DRTR BIN 01111110 

87 DRTR BIN 01111110 

88 REM 

99 DRTR BIN 00000000 

91 DRTR BIN 00001000 

92 DATR BIN 00001000 

93 DRTR BIN 00001000 

94 DRTfl BIN 00001000 

95 DATA BIN 00011100 

96 DATA BIN 11111111 

97 DATA BIN 11111111 
93 REM 

100 DATA BIN 11111111 

101 DATR BIN 10011001 
10S DRTR BIN 10011001 

103 DRTR BIN 11111111 

104 DATR BIN 11111111 

105 DATA BIN 19011001 

106 DATA BIN 10011001 

107 DATA BIN 11111111 
103 REM 

110 DATA BIN 10000000 

111 DATA BIN 11000001 

112 ORTR BIN 11090001 

113 DRTR BIN 11000001 

114 DRTfl BIN 11000001 

115 DATA BIN 11100011 

116 DRTfl BIN 11100011 

117 ORTR BIN 11111111 

118 REM 

120 DATA BIN 11000000 

121 DATA BIN 01110000 

122 DATA BIN 00111100 

123 DATR BIN 00011110 

124 DRTR BIN 00011110 

125 DRTR BIN 00001111 

126 DRTfl BIN 00000111 

127 DRTA BIN 00000111 

128 REM 

130 DATA BIN 00000111 

131 DATA BIN 00000111 

132 DATA BIN 00001111 

133 DATR BIN 00011110 

134 DATA BIN 00011110 

135 DATA BIN 00111100 
134 DATA BIN 01110000 

137 DRTfl BIN 11OOO000 

138 REM 
190 LOAD '■" 

9999 SAVE "GPr i n cess* " LINE 1 

1 PLASM INVERSE 0. BRIGHT 

OVER 9 BORDER 1: PAPER IN 

K S CLS GO SUB 8290 

5 LET hi=0 LET »|i"P«f ionni" 

19 REM RBCDEPGHIJKL 

20 REM * X * 5 ■ » S t J, S L \ 

30 LET CO*0 LET bOU-0 LET at 
■ ■'*■'. LET ch=0 LET p-0 LET i. . 1 

35 INPUT "NOibrt dl vi* (St dt 
1*3 ?",V 

40 IP v>3 OR v<l THEN CO TO 35 

50 GO SUB 1*500. PRINT 01 

■9 1985 Marc RICHARD" GO SUB 3 

000 

80 GO TO 2500 

500 REM I 

501 REM : „ 

502 REM una booh an nun a 
510 PRINT AT 3,9, INK 1. 
515 PRINT AT 3,0, INK 1, 
520 PAINT RT *,0, INK 1, 

AT 4.20, " 



525 PRINT AT 5. ST INK 
530 PRINT RT e.i~ 
AT 6,5, INK 1, 
B35 PRINT RT 

RT 7.5. INK 1. 



1. 




Hint at 14, e 

" - AT 14 — 

14 ,24; INK ' 



INK 4, _ 
INK 1, "H" . RT 
",RT 14,31, 



ink 1 ,■•■■■ 
575 print rt 15,2 0, ink 1, 

, RT 15,24. INK l.'HQB" 

5e0 PRINT RT 16,9. INK 2, 

585 PRINT RT " a 
T 17,3 _ 
NK I,"' 

590 PRV 

18,3, INK l; 

595 PRINT AT 
19,2, INK li ■'_ 
, AT 18,32, INK 

NK 1, "5S". AT 19,24, 
630 PRINT RT 20^0, INK _ 
20, 20,, INK 1,"XH",AT 20.30 



2, 12, _^ 
999 RETURN 

1000 rem n aaaaannn 

1001 REM — 
1005 REM 

1004 PRINT ... 

1005 PAINT RT 3,0, INK 1; "■" 
1010 PRINT AT 3,0, INK 1 : "We- 
1020 PRINT HT 4.0. INK 1 , "£§3 
T.V.=i° ' INK 3 ' "°"- mT *•*; INK 
ToTo PAINT RT 5^0, INK i; 3££ 
T . = -fi,. INK_li "■«■■, AT S..19TlNK 

21, INK 1, "='■ «+ 




- .RT 5 

3, INK 1, "3", AT 5 
AT 5,27, INK 1; "§' 
T 5,31, INK 1, "JT 

1040 PRINT AT " 




1060 



1, INK 1,"3",AT 5.3 
fit 3,25, IRK 1;.'Jb", 



INK 1 , S£5£e , 

RT 7, 19, INK 

1. "3", AT 7,23 

INK 1, -■£", A 

7,39, 'T. AT 

t" RINT AT 
' , AT 
K 1.'=== 
1070 PRINT flT^ 

ti*Ur *""— 

l6ea PRINT RT 10,1, INK 1 ; "B" , AT 

-ijEUi' INK 7,"U".AT 19,3, INK 1, 

AT 10,18, INK l; "BSE" 
1090 PRINT AT 11,6, INK aTI^flT 
11.35, INK 1, "8" 

« PRINT AT 13,0, INK 
^AT 13,13, INK 
FOR »£l3T031 PRINT RT f, 
0, tnk i | • MBfiaa=~5sr . AT a. 20, IN 

1110 F0R»?3 TO 19 PAINT RT 21, 

«. INK 7, -X" NEXT a 

1120 PRINT RT 15,39. INK 1. 3 

POP 4«15 TO 31 PRINT AT a. 30, I 

NK 1; '■EH" NEXT a 

1130 FOR a=17 TO 21 PRINT AT a, 

28, INK 1, '•£■' NEXT a 

1135 PRINT RT 31,29, INK 1 , £ 

1140 PRINT RT 30.29, INK 1, £ 

1150 PRINT AT 19,30. INK 6, '»' 

1160 PAINT AT 1.31. INK 6, "V . RT 

a. 3i, _£ 

1499 RETURN 

1500 REM 

1501 REM 

1502 REM aaaaaaaannna 

1503 PRINT RT 1.20. INK 6 

a, 30, ■■/■* 

1505 PRINT AT 3,13. INK 1 
,2.15. INK l.'3'.AT 3,17, 

1S10 PAINT AT 3,13. Ink 1 

1515 PRINT AT 
",RT 4,14, INI 
1530 PRINT AT 5. 
1535 PRINT AT 6 , 

" , 16, "3", AT 6,3 



7, 1 
PR.INT RT 8,0 



1540 PRINT RT 9. 





1560 PRINT 

1565 PRI NT RT 16, _. 

T 16,4, SEm™ , AT 1 6.9, INK 

" . AT 16.19, IN K 1 . •• ■!"-'-ftTl" " . RT . 16 . 

16 £~c™~~~ AT 16.29 ~~5 

1570 TppTnT AT 17 . . INK 1,***, AT 

17 .*.3* :i«' ■ fiT 17.25. "33' ■ AT 17.3 
1575~"PAINT AT 16,0, INK 1. S'.AT 

18,3, "•£""' ■ AT 16,15 INK 7, A'.fl 
T 13.25. INK l.-Kas?- AT 18.28. I 
N* 2, '4 '.AT 18.2?. INK l; "fiSt 
1550 PRINT AT 19,0. }NK 1 "m^. fiT 



2025 PRINT AT 6,0. INK 
2030 PRINT AT 7,4, INK 
7,7, "3", RT 7, 10, "BhHbI 
2935 PRINT RT 8,3. INK 77', 
~ ' . INK 1. 3, AT 6.7. 3fe 

4 J., INK 4. ' -.AT. 6, IB. 

v'-XvX- h: ->"-"-»-i^ 

2040 PRI NT RT 9,1, INK 1,"E3 
AT 9,7, "HE". AT 9,35, "3" 
3045 PRI NT A T 10.3. INK 1 . "3 
T 10.7, ■•SEES", AT 10,12, INK 

.AT 10,25. INK 1, "3" 
2050 PRINT AT 11,0, INK 
T 11,4, "S". AT 11,7, 

ii*Afii;|9r ; «T 11.35; 

2055 P'r INT AT 13,0, INK 1; " 
AT If 
35. - 



* ■-.*■ 



20£O PRINT AT 13,9 
13,4, "S" ■ fiT 13 - 14 
5. ■"*", AT 13.26, IN 
2065 PRINT AT14.2 
j.AT 14,13. «55~f ' 
It" 

3070 PRINT AT 15, 1 




INK : 

2075 PRTnT 

33' . fiT 16.35 _ 

2080 PRINT AT 17,10, INK 

gas . AT 17,35, "1", AT 17,27, 

AT 17^g9, INK 7, U'-.AT 17,30; 

2085 PRINT AT 16,0. 

T 18,3, "3=1. AT 18,6. „ 

RT 18 , asT 1 '*" , AT 18,30. INK *, 

2090 PRINT AT 19,0. I NK.l t ,;5i 5L,. A 

2095 PRINT AT 20,0, INK 1 . "Sg" , A 
T 20,3, "35" , AT 20 ,24. "3", INK 6. 
■•»■■, AT 21,24. INK 1 , "£^£~3™" 
2100 PRINT AT 21.0. I NK1 , TT ~S " , A 
T gJL.3. INK 7. "0." ■ AT 31.3, INK 1 

2lTo POR a=5 TO 33 PRINT RT 31, 

«. INK 7, "A" NEXT a 

2493 RETURN 

S-S09 REM protrtiit principal 

2S10 IP co=0 THEN GO SUB 8100 

2520 PRINT RT . ,y, INK 6,«f 

2525 IP t>l TMEN GO SUB 4000 t HO 

0» it-2J » 

2530 GO SUB 3100 

2540 IP CO=0 THEN GO SUB 8000 

2600 GO TO 2500 

2999 REM po&ttion du d«but 

3000 LET -1=0 IF 1=1 OR 1=2 THE 
N LET x«l LET v*0 
3005 IP U2 TMEN LET 
3010 IP t»3 TMEN LET 



LET y* 



3015 IF 1=3 THEN LET *>10 
3020 IF T.=4 TMEN LET Ch=0 
= 3 LET y=3 LET «=13 
3025 IF t=2 THEN LET w=12 
3030 RETURN 

3100 IF SCREEN* Ix-luH* 
C0=1 THEN PRINT AT 
«=<-l BEEP .01,60 
LET :o=0 



X LEt 



■ •-•«" 



"h" And y Ol AND 
ATTR (K.ytli >1 TMEN PRINT AT x, 
y," '■ LET p=p + l LET v«ytl RET 
URN 

3110 IP IN»-EVS = "9 RND V > =0 AND 
~ T x , 
RET 
URN 

3120 IF INKEV» = -'u" AND C0=0 AND 
u . 30 AND ATTR lx-l.ytlit-1 TMEN 
PRINT AT x.y." " BEEP .01,35 L 
ET p=P*l LET v«¥*l LET x=x-l 
PAItJT AT X,y, INK 5, '*'■ IF ATTR 

l«»l,»)()l RND ATTR iXtl.U+llO 
1 TMEN PRINT AT X.y," '" LET .=. 
♦1 LET v=y*l GO 5UB 3100 PRIN 
T AT x.y, INK 5,' 1 *" AETIJAN 
3125 IF It4KEV* = 't" AND CO=0 AND 
U>1 AND ATTR lX"-l,y-l) Ol THEN P 
RINT AT X,y, " BEEP .01.35 LE 
T P=p*l LET v=y-l LET x*x-l P 
RINT AT K.y, INK 5,"*,' IF ATTR 

(X+l .y) < -1 AND ATTR lX4l,y-ll <)1 

TMEN PRINT AT x.y. " LET < =x ♦ 
1 LET y=y-l GO SUE 8100 PRINT 

AT x,y. INf 5."*" RETURN 
3130 IF ATTR lx-l.y»*>l AND CO=0 

AND SCREEN* l»-2 J y> »"_" TMEN PR 
INT AT , u," ■ LET *=x-l BEEP 
.01 35 LET a*= T LET co=l PR 
INT »t , y ink 5 it 

3140 return 

4000 PRINT AT 1 1 , i» . ' * 

4010 IF .'=24 THEN LET »1 = 1 

4015 IF ■■13 TMEN LET «1>0 

4030 IF wl=0 TMEN LET w >W ♦ 1 

4025 IF »i«l TMEN LET w«*-l 

4050 PRINT AT 11,1,. INK 7 . "•" 

4055 IF ATTP K.y i =7 TMEN GO TO 

"•000 

4060 RETURN 

4100 PRINT AT 9,w.' " PAINT AT 

15.W+6," " 

4110 IP hfaig TMEN LET Ml«l 

4115 IF w=10 TMEN LET w 1 «0 

4130 IP wl=0 TMEN LET u>«tl 

41^5 IP «(1 = 1 THEN LET M-H-l 

4150 PRINT RT 9,*. INK 7, "| , fiT 



15 , 



♦ 6, 



4 155 IP RTTR 



,y) «7 TMEN GO TO 



,RT 10,43-w 



INK 



4 180 RETURN 

4200 PRINT RT 6 , W . 

, " ". RT 16, •♦IS, " ■ 

4310 IF «« = 16 THEN LET »1«1 

4215 IF w=12 TMEN LET -1=0 
4220 IP -1=0 THEN LET ¥ ■« . 1 
4225 IF *1=1 THEN LET w *w - 1 
4250 PAINT AT 8.W. INK 7, i |',RT 
10.43-w, '■• RT 16.M.15, •••" 
4255 IP RTTR ,,iji,7 TMEN GO TO 



4360 RETURN 

6999 REM f»n 

7000 PRINT AT x,y. INK 5, FLASH 
1. * 6EEP .5,0 BEEP .5,0 BEE 
P 1. -10 

7005 IF V:l THEN GO TO 7200 
7010 PRINT AT 10.11, INK 8, PLRS 
M 1. ■'GAMEBO'.'ER" 
7020 FOR »=0 TO 500 NEXT a CLS 

7030 PRINT RT 0.11, INK 5. PLflSM 

1. RESULT ATS " 
7040 PRINT AT 5 . 11 , 'SC f « : " ; P 
7045 IF p-=1000 THEN LET b»«" If 

500 RND P < 1999 THEN L 

IF PvSOO RND P . -200 THEN LC 
T b*r" «oy<n" 

7970 IF pi20O TMEN LET bt= nul" 
7080 PRINT RT 15,5,"0onc voos «l 
tt. .."J FOR a=0 TO 300 NEXT a 

PRINT b* 
7085 IF p>hi THEN LET h»«l*P IN 
PUT "Uoife r.o» ''■•.2$: LET Bt=Z* 

IF 1*="" THEN LET »*="qu*lquun 

709C PRINT AT 30,0. "HCi I Itur SCO 

re " , hi , " dc '*; m 

7100 PAU5E 0; INPUT "On rtjout ? 

". c* 

7110 IP CS(1)b*'0" OR C*(1»»"0 - " T 

HEN CLS ; GO TO 10 
7120 STOP 

7300 LET V»V-1 

7301 IP t=5 THEN LET t»l 

7205 CLS PRINT RT 5 , 13; "U» ft <» > 

7310 PRINT AT 19 , 13 , "T»b Ltiu " , \ 
7220 PRINT AT 15 , 10, "SCOT « " , p , " 

points" 
7230 PRINT HT 20,10, "PRET ?" LE 
T a*""*" LET CO»0 LET Ch=0 BE 
EP .1,34: FOR a>0 TO 300 NEXT a 
: PRINT RT 29 , 10, "PRRTEZ . . . BE 

EP .1,35; FOR a-0 TO 100 NEXT a 
CLS : GO TO 50 

7999 REM Chult 

8000 IF C0=1 TMEN RETURN 

8005 IP RTTR <x*l,yiol THEN PPI 

NT RT x,y," " LET Ch=Ch*l LET 

X=x*l GO 5UB 8100 PRINT AT x,y 

, INK 5,"*" BEEP .1,15-Ch 

3010 IF ATTR ix+l,y.=l AND Ch<4 

TMEN LET Ch=0 RETURN 

3020 IF RTTR i.*l,yi=l AND CK>3 

TMEN GO TO 7000 

303O GO TO 8000 

3099 aem t«st couieurt 

8100 IF ATTR lx,yl=7 THEN GO TO 

7000 

8105 IP ATTR (x»l,yi=7 THEN GO T 

7000 

8110 IP ATTR ix, y) =3 THEN BEEP . 

1, 13 LET psptlOO 

8130 IF ATTR ix, y) =2 THEN 6EEP . 

1,0 LET bOu=bOu+l 

8130 IF bOU.'=4 THEN LET V »v ♦ 1 L 

ET bou*0 

8140 IF ATTR l«, y. =6 TMEN LET t = 

t«l BEEP .5,0 BEEP .5,0 BEEP 

1,12 GO TO 7201: CLS GO TO 45 

3150 RETURN 

8152 PRINT m, 1 ' Presttz une 

THEN GO TO 81 



he" 
3155 IF INKEY*< 



i5E 






riTICE! 

■2 1988 Marc 



8205 PRINT 01, " 

Ri chard" 

3210 BEEP .5,-4 BEEP .5,0 BEEP 

1,3 BEEP .8,3 BEEP .8,3 BEEP 

1,3 BEEP .5.3 BEEP .8,8 BEEP 

.8,7: BEEP 1 .6 PAUSE 5 
3220 BEEP .5.6 BEEP .5.6 BEEP 
1,7 FOR a-7 TO 5 STEP -3 BEEP 
.8. a BEEP .5, a BEEP 1 , a -3 NEX 
T a 6EEP 1,8 

3230 6EEP .8,3 BEEP .5,7 BEEP 
1.6 BEEP .5.0 BEEP .5,1 BEEP 
1,3 BEEP .5,1 BEEP .5,0 BEEP 
.5.-3: BEEP 1,-4 

3240 C LS . PRINT AT 0,10, FLASH 
1, BUT Hi JCU" 

3250 PRINT AT 5,0, -you* ties te 
vinUL P*t»t PEDRO et La princes 
SI •■ o t r i fiancee) vicnt d'etre 
«nievee par tes Force* Maiefi 
4ues.fiurez-vous it courage d€ .* 

sauver watgre .«s buiupus dan 
9crs parscnes su r votre Chetm 

8353 PRINT AT 15, 10. "DEPLRCEMENT 
3 ",AT 17,0, "Saut gaucht: *t"*,"8 
»ul droi te u ' " , "Gave he 'g "" ,"Dr 

oi te h ' " 

8355 GO SUe 8151 

3260 C LS - PRINT AT 0,10, FLASH 

1, "BUTIBB JEU" 

8265 PRINT AT 3 , 0, -DIPFERENTS D 

ANGERS Trout'", INK 7, "U " . IN 

K 5, .■'Point**'", INK 7, "A", I 

NK 3, " ' " . "Squtltttt* ' ", INK 7,"» 
", INK 5, " "'. "Panto«e* '", INK 7, 

"|" . INK 5, 

8570 PRINT AT 5,0, " -BOUTEILLCS' " 
. INK 2. "4", INK 8.'' II y en un 
< seutepar tableau. et Lor* que vo 
us en avez bu 4t hip&i > .vous a 
vez unewie suppLeatentaire" 
3375 PRINT RT 9,0; '-COPPRES' ", I 
nk 3. "5", INK 8, "II* vou* donn 
er t lOOpts a chaque roi* que vou 
s tes prenez" 
aaao print at ia.o, "-grilles -, 

INK 6,"B", INK 5;"' ou PRINCESSE 
S' ". INK 6, •»■■, INK 5,"':EL-Les 
pernettent de Changer de u-tua 

8285 PRINT RT IS .«. " -COROES'" ; I 
NK 4,"_", INK 3,-' Ptriettint de 
traver-ser un fosse. »ais attent 
lon'Uousdevez r ester un certain 
t»»ps endesious pour vou* ace roc 
her** 

8390 PRINT RT 19 .0, ' -CHUTES Mort 
e i Les & i trop hautes " 

8295 PRINT AT 39.9, -TABLEAUX Au 
nokbrc de 4. votre fiancee se t 

•*o jve au d«rn»tf ..." 

■S3 99 GO SUB 3151 CL5 RETURN 

9939 SAUE P.-inces&€" LINE 1 # 



L'ANEJAUNE 



Pauvre carre jaune, vJctime dun grave probleme ote 
promiscuite, cherche joystick sympa bourre d'astuce. 
pour te sortir de la. 



A suivre : 

Eft raison de la longueur 
mhabituelle du listing. 
nous passerons ce pro- 
gramme en deux fois 



COMMODORE 64 






Claude BAISNEE 



Mode d'emptoi : 

L'emptoi dun joystick est indispensable 



ERRATUM Super PAC COMMODORE 64 du N* 80. 

Pluldt indigestes ces 2 lignes de OATAS "Super PAC vousles a restrtuees 




- 19 F0PI=9I05 FOPJ«8TQ6 FlHWCC' 1. J> NEXTJ I 
<j28 P0TE53269 . PEE* • 53269>ANII254 

63e ppiM-nmmr . n=* go$ub5518 

-^40 POE53248 162 PC*E53249,12? POKE 5 3269 . PEEK ■ 53269>0PI 




•^••^•••••"••••••M 



1-... i. till "MM 


a ■ a ■ a ■ T" ■ a » 


1^1 PRINT "MJ0» 


3 ■ II !■ ■»» ■ 3 ■ 


tae print-mrh 


»■ a ■ 3 ■ 3 ■ a •»■ 


1 ti PfMNT'OMI 


1 'J "T 3f w j - 3 - j - 3-3 


■■••« PflHT-MH 


a ■ jrw ^ar» a" a ■ a 9« a • a *• 




a- a" 3" i! a* a «y» a" iff" 


229 PP1NT"NMJI 


a ■ a ■ 3 ■ 3*3" 'W a ■ a w 


230 PRINT -BJ0U 


• i! a" a* a* a" is w* a r 


24>j print -awr 


r*» ar-r a • a ■ ^a^ »RNr *■ *»■ * a r- 


_^e ppint-ibb* -*a nr a" i« *a nf ■■ 


264 HinfKt5,£> 


V-342 72 


279 FOPI=8T062 


RErtW Pi_*E832«Ift NEXT 


2*J POKE2948.13 P0KE532878 PGKE53248. 145 PC4E53249. 194 


-' FOPWTOi&ee next 



*3t<PEE>'53^4i'. 
>-3«<PEEK'53249. 
»3«<PEEK- 53*48 • 
-34<PEE1' 53248" 



399 PEN •••♦♦••PRESEHTAT I ' 

381 

319 M=l PRlNTTlr. G0SUB5518 

i28 P»JKE53269PEEK53269>0P1 

339 PPINT-aHJ-mB'19)" VOUS DEVEZ FR1PE" 

346 PPINTThB<19>"S0RT1P UE CHRRE JRUH£- 

358 PRINTTHB<I9'"T BE Lfl BOITE EH" 

368 PPIMTTAB<19>- FAISHHT GLISSER LES' 

378 PRINTTRB'19)" PIECES POUR LIBEPER - 

389 PRINTTRB<19>- LE PRSSHGE. " 

^» PRINTTHBa?*-****? CELfi.VOUS HLLE2' 

490 PPIMTT«B(19)-FU»CER L£ POINT NOIR" 

41M PPINTThB<19>" SUR UHE PIECE RVEC" 

429 PRINTTH8(19>-L£ JOVSTICK (PORT l>* 

439 PRINTTRJ)'. 19>*PUIS EH RRPUYHNT SUR" 

449 PPINTTHB<19>-LE 80UTON ROUGE VOUS" 

459 PPINTTHB(19>- 0RIENTE2 LE NHNCHE" 

468 FRINTTfiB' 19>-DHNS Lfl DIRECTION OU" 

479 PRINT" VOUS VOULEZ DEPLBCER LH PIECE. SI LE - 

4i*J PRINT-nOUVEICNT EST POSSIBLE. IL S'EFFECTUERH, - 

499 PPINT-SIMON IL NE SE PftSSERR RICH. " 

589 S=8 

519 F0RI=491?2T0496U REftLfi S=S*fl POKEI-H NEXT 

529 IFS065269T>CNPRINT H n»lt«888«J88ERREUF OHMS LES DHTRS. ■ 

539 PRINTTHB<10>"» VOUS DE JOUER'- 

540 PRINT**! TfiPEZ UNE TOUCHE QUHND VOUS ETES PRET. ". 
559 GETR« IFR«-*-THEH358 

688 REN ••TJEPNIEPES INITIALISATIONS** 



PB8 PEN l 

781 

no P-PEE*. 56321 ■ 

"29 lFP<T39THEH7t>e 

?J9 IFP=254THEHPOK£53249.PEE>t(53249.i 

748 IFP-253TMEHPO>E53i'4?,PEEI'^5324?.- 

T59 IFP>=25ITMENPt»E53248.PEEI"53248" 

768 IFP"24?TMEHPOKE53248.PEEI"5324Si 

?7B WT07I9 

798 J=>IHT*(PEEK(53248v-53>/24)*l 

798 I=1NT'<PEEK<53249>-T8>/24>»1 

888 ]FH-,i- I, J .-8TMEN718 

818 T'-flX<I.J)*<W:<I.J>Cie>-INT'HZ(I. ])/l9i9<fK<l.}-»lQ> 

329 0NTWSUB1818. 2819. 3919.4818 

839 GOT0719 

999 

1999 REM •••••S.'P TRHNSFERT BLOf ••••• 

1881 

1918 2«INT<<PHND7-INT'.<PflND7>/7>a7>/2>*l R"INT< <Z»1 1/Zi 

1828 0NR0OSUB1 118. 1218 

1838 RETURN 

1899 

nee rem trrnseert lrterhl 

1181 

1MB IFFK(I.J-<-UTZ>OeTHEMRETURN 



ll.i 



II 



1136 P0KE7SI.2 POKE2.2 P0KE253 . 4 

1148 0OSUB6518 

1158 SVS49I52 

1168 P0KE54276.8 

1178 RK<I*J}^-MC<I.J-(-l>12>-l 

1186 RETURN 

1199 

12W REN TRHNSFERT VERTICRL 

1281 

1218 lFFK<I-<-l)t2.J>C>8THENPET^PM 

1229 G0SUB68ie 

1238 P0XE781.2 P0KE2.2 P0KE233.4 

1248 G0SUB6S18 

1258 SVS49291 

1268 P0KE34276.8 

127© flK<I,J>-« (Wa-<-l>TZ.J)-I 

1288 RETURN 

1999 

2888 REN S/P TRflNSFERT PIECE HORIZONTALE 

2081 

2819 Z-INT<(PHHII7-INT((PflND7)/7>a7>/2> + l R-INT< C2*l>/2! 

2828 IFFK(I,JK>28THEHJmJ-1 

2838 0HRG0SUB21I8,22ie 

2848 RETURN 

2899 

2188 REN TRfiHSFERT LflTERflL 



2181 

2118 IFFK(l,J*.5-1.3*<-l)t2)oeTHEMRETiJRN 

2128 oosuBeeie 

2138 P0KE781.2 P0KE233.4 

2148 00SU8«5ie 

2158 SVS49445 

2168 POKE54276.e 

2178 FK(I,J»<<-l)tZ»l)/2)-8 -WAX, J-<-l)t2> 

"28 f«<I.J-<-l)TZ*l>«21 

2188 RETURN 

2199 

2288 REN TRANSFER! VERTICRL 

2281 

2218 IFNX<l-<-l>1Z,J>OeORRX(I-<-l>tZ.J»l><>eTHENRETueN 

2228 00SUB6818 

2238 P0KE781.2 P0KE2-5 P0KE2534 

2248 00SUB6319 

2258 SVS49291 

2268 P0KE54276.8 

2278 «!(i,j)«e fiXd-(-ntz.J) 

"28 «Ct I, J+n^-WC !-(.-!> tZ.J*l>«2l 

2238 RETURN 

2999 

3888 REN S/P TPflNSFEPT PIECE VERTICHLE 

3881 

3818 Z"INT(i:PHND7~INT<(PflND7)/7)*7>/2J*l R-1NT<<2*1 >/2> 

3828 IFflKU.J>038THEN>l-! 

3838 0NR0OSUB3ll8.32ie 

3848 RETURN 

3188 REN TRHNSFERT LHTERRL 

3181 

3118 IFF«<I-J-(-lJTZ)OeORflK<l*I.J-(-UT2K>eTHENPETURN 
3128 G0SUB68I8 

313« P0KE781.5 P0KE2.2 P0KE253.4 
-31 

IMP DOSUMSte 
3158 SYS49152 
3168 POKE54276.9 

3178 FR(I.J)-e FK(I.J-(-l)TZ)-38 flX<I*l.J)-8 HX< 1*1, J-C-l ) tZ) 
3198 RETURN 
3199 

3288 REM TRHNSFERT VERTtCHL 

3281 

3218 IFm<I + .3-l.»C-I>tZ,J>C*rrHENRETURN 

3228 G0SUB6818 

3238 POKE2.2 P0KE253.4 

3248 G0SUB6318 

3250 SVS49483 

3260 P0KE54276,8 

3278 HX<I*<<-l>TZ+l>/2,J)-e RX<I-<-l)TZ, J)"38 HZ(I-(-l)fZ»l, J 

"31 



3288 RETURN 



V TI99 BASK 





Suite de Is page 8 




12SO CMJ. DMRU30.' 

]2to CALL CHAR(129.-lClCO0FE3»lCI436-> 

1270 CALL VCHARI2.17.129.H0) 

1290 CALL VCHARI2.30. 130.LA) 

1290 CALL COLORU3.il, 5) 

13O0 CALL CHAR<X5. "3C42SSe991A|4Z3C-> 

1310 MRS-INT <RND*9>*1 

1320 ON MRS BOTO 1330.1370,1390,1410.143 

O. 1450. 1470. 1490. 1S10 

1330 LIB*-: 

1333 COL -3 

13AO GOTO 1320 

1370 L1GNE-3 

1375 COL-e 

1380 SOTO 1320 

1390 LIGNE-3 

1393 COL- II 

1400 SOTO 1320 

1410 LI8NE-6 

1413 COL -3 

MM GOTO I320 

1430 LIGNE-& 

1433 COL-e 

1440 BOTO 1S20 

1430 LIGNE-6 



1493 COL-B 
13O0 BOTO 1320 
1310 LIQNE.9 
1313 COL-11 

1320 CALL HO*A»t(L18NE.COL*2.34> 

1321 COL -COL.. 2 

1330 CALL 0DUMHI234.-1.OI 

13*0 XO-4 

1SSO L»-B 

13AO CALL JOVSTU.I.V) 

1370 CALL KZYU.ST.V) 

13BO IF ST-i* TtfEN IA90 

1390 CALL HCHAR(I8.L*.321 

1AOO LNEM-V/4 

1&10 INt»*-I/4 

1A20 CALL OCKAf) I IB-LWEM. LJ>« Kn, 3POI 

1*30 IF SRft*107 THEM 13AO 

1*40 IF SP*-!22 THEN 13*0 

1*30 IB-XB-LMCM 



1*70 CALL WHMOI.LB. 33) 
1*71 CALL SOUND* -I. 123.0.' 
1*72 CALL SOUND! I.43A. 12) 

i&eo goto is*o 

1*90 IF (S»-LIBNE>*(L»-COLITHEN I 

17O0 BOTO 13*0 

17IO REN 

1791 PRINT 

1S30 CALL CLEAR 



tA FlUf CE tHT-' 

A B«"£N PU VonP >o*si 

MA 30PE POOR "R'M^g., 

1840 ON MRS eOSUB 3270. 33B0.4090.4090. 32 
70. 4430, 35B0. 33SO. 4090 

IB42 CALL CHAR(153. -FFFFB3e383B3FFFF-> 
1B43 CALL COLORtl*.2,l*) 

1844 CALL HCHARC22. 1.132.32) 

1845 CALL HCHARI23. 1.133.32) 
184* CALL MCHAR(24.1. 132.32) 

1850 PL -5 

1851 PL«SPL 
I860 PC-5 
18*1 RC-SPC 
18*5 GOTO 2O30 

1870 CALL HCHAR(PC.PL.POI) 

1B71 NPL-INTIRND.JI -] 

18S0 8RL-INT(RND»3> -1 

1B90 CALL eCHAR(PC*NPL.PL>BPL.P01) 

19O0 IF POI-104 THEN 1871 

1910 IF PL*8P-22 THEN 1871 

1920 PC-PC »NPL 

1930 PL^>L*BPL 

1940 CALL HCHAR1PC.PL. 138) 

1930 RETURN 

I960 SOTO 1980 

1970 SPWC-1 

1980 CALL BCHAR(SRL.9RC.STV) 

1990 IF STV*104 THEN 1870 

2000 IF SPL-20 THEN 1B70 

2010 CALL HCHAR1PL.PC.STVI) 

2020 CALL HCHAR<SPL,SRC. 13tii 

2021 ! 

2022 ! 

2030 STV8TVI 
2040 RETURN 
2030 REN 

2060 IF MO'- 2 THEN 2*00 
2070 IF LMii THEN 2*O0 
20BO CALL HCHARI23.23. 129) 
2090 XB-23 

2100 LB-2S 

2101 FOR MhST>1 TO LKJ 
2110 CALL JOrST(l.i.v) 
2130 CALL 'Fvii.6t.vi 
2130 IF ST-1B THEN 22SO 
2140 CALL HCHARIX8.LJJ.ERT) 
21SO XNEM-V/4 
21*0 LNEM-l/4 

21*1 IF IB-INEN-24 THEN 2110 
2170 CALL eCMAfXIB-XNEN.LJHLNEM.ERT) 
21B0 IF ERT>104 THEM 2110 
2190 IF 1B-INEW-2I THEN 21 10 
2200 IX-IB-XMEM 
231 Lt-LIHrCN 
2220 CALL HCNAR4M.L*. 1291 
22T.O BOSL* 107O 

2240 NEXT MRST 

2241 PRINT ~ TROR TARO* 
22*3 FOR TVUIO-1 TO 200 
2244 NEXT TVUIO 
2243 BOTO 24O0 
22SO CALL NCHARt XB.LB. 130) 
22*0 1 
2270 * 

[-30 

TO L*J 

KIOO. 123.2) 
2290 CALL KEV(1.5T.UI 
23O0 IF ST-1B THEN 2330 
2310 60SUB 1870 

2320 NEXT BNN 

2321 GOTO 2241 
2330 CALL CHAR l 139. - 1 BIBISIBIBI Bl 81 B- : 



ifiTRlGO££. t 

£»+e j?esAeoe 

Sous $f>> 5*spS 
A Soft T&uR.. 




A SUIVRE... 



ET £ll£ S'gVi«AH?uiT 



I -UN VEL0->300»" 



2340 CALL COLOR t 16. 4. 1 ) 

2330 CALL HCHAR(XB-1 .LB. 139) 

23*0 CALL SOUND <-100. IOOOO.O) 

2370 IF (PC-XB-D* (PL-LB) THEN 2420 

23SO IB-IB-1 

2390 IF XBOt THEN 23SO 

2400 SOUS-SOUS- (NO»50> 

2410 BOTO 1070 

2420 CALL HCHARf.XB.LB. 32) 

2430 XB-XB*1 

2440 CALL HCHAR (XB.LB. 138) 

24SO CALL 6CHAR I XB*1 .LB.NNB) 

2460 IF MN6 :i30 THEN 2420 

?4S0 SOUS-SOUS* (NO* 110) 

24H2 CALL SOUND ( 123. 1 10. 1 ) 

2483 CALL SOUND < ISO. tOOO. 1 ) 

2484 GOSUB 330 
2490 6OT0 1070 
26O0 REN 

2*10 call Clear 
2620 call screen c2) 

2*30 PRINT ■ DUE VEUT TW m 

2*40 PRINT t!::-TU AS ": SOUS! -•"::: i 

2630 PRINT " O-AIEN" 

2**0 PRINT 

2*70 PRINT 

2*80 PRINT 

2ATO PRINT - 2-UNE nOTO->*OC«- 

2700 PRINT 

2710 PRINT .- 3-UNE V01TURE->1000«- 

2720 INPUT R 

2730 IF R-O THEN 2870 

27SO SOUS- SOUS *NO*200 

27*0 R-NO 

2770 SOUS-SOUS-NO* 303 

27BO PRINT - IL TE RESTE -lBOUSl'4 CAR 

AI RERRIS TON ANCIEN VEMICULE" 
2790 PRINT III 
2800 IF R<>3 THEN 2870 
2810 SOUS-SOUS-lOO 
2S20 REN 
2870 PRINT SOUS 

2880 PRINT - CONSIEN MOnNEC->bO*- 
2090 INPUT RS 
29O0 SOUS-SOUS -RS**0 
2910 H0-K)*8S 

2920 PRINT ttt'TU AS -ISOUSl-** 
2930 PRINT ii-CONBIEN DE LAlER->40«- 
2940 INPUT TV 
2930 SOUS-SOUS- TV .40 
29*0 LA-LA. TV 
2970 PRINT 
2980 PRINT 
2990 FOR D-l TO 300 
3OO0 NEXT D 
3010 GOTO 1070 

3270 CALL CMARI38. -FFFFFFFFFFFFFF7E-> 
3280 CALL CHAR < 121 . -DFDF0OF7F700DFD0-' 
3290 CALL CHARI*4. -FF8181B1818181FF") 
3297 CALL CHAR(32. "0000-) 
3300 CALL SCREENISl 
3310 CALL COLORf 1.7.3) 
3320 CALL COLOR 1 12.4. 3) 



3410 PRINT 

3420 PRINT 

3430 PRINT 

3440 PRINT 

3430 PRINT 
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34*0 PRINT 

3470 PRINT 

3480 PRINT 

3490 PRINT -!!!••!!!!•!!)■•■!!!! 

I5O0 PRINT -•'••!■"■'• f ' • ■•••••• • • • • • • - 

3310 PRINT ! ! '■'■•'■■■•<•■■■ 

3520 CALL WCHARU.2. 104.24) 

3330 CALL VCHARI1, SO. 104,24) 

31,40 CALL HCHAR* 1,1. 104, 30> 

3530 CALL HCHAR (24. 1 , 104,30) 

35*0 CALL COLOR(5,l*.l> 

3370 RETURN 

3380 REN PRISON 

3590 CALL SCREEN (31 

3600 CALL CHARI38. "FFFFFFFFFFFFFFFF" > 

3*10 CALL CLEAR 

3*20 CALL COL0Rd.15.il 

3*30 CALL CHARd2I."FF99Y99v999999FF") 

3*40 PRINT -fthhl^hhhhhhhNhhhhhhhntihftNrirtft 

3*30 PRINT -h h 



(.blLlPRISONLLLLLLtL 



Uvlvtvlvly.vtv.yll 



*****•.** 



3A60 PRINT -h 



3*90 PRINT ' 



3720 PRINT "h 

3730 PRINT -h 

37*0 PRINT "h 

3730 PRINT -f» 

37*0 PRINT ■hhrtnr 

3770 CALL COLaRI12.2,3> 

3 780 RETURN 

3900 SOTO 3270 

3980 PRINT -h ■ ■■■>■■>**«.■*»■■**, h 

4090 REM i«liu 

4100 CALL CHARI3R, -01O3O70F1F3F7FFF- > 

4110 CALL CHAR (37. -•OCOEOFOFIFCFIRF-I 

4120 CALL CLEAR 

4130 CALL SCREEN'S) 

4140 CALL COLOR(I.7,S> 

4ISO CALL CHAR ( 33. TrFFFFFFFFF T-F F FF - ) 

41*0 CALL CHRR<121.-O10303O«214iaiai-l 

4170 CALL CHAR(!22.-BOCOAO9O«4«3B101-> 

4177 CALL CHAR(ll?.-O0FFBlSlFFOOaiFr-> 

4180 CALL CHMR(120. "FFBIBI 81BI B1B1FF" ) 

4190 CALL COLOR d 2. 2, 13) 



3330 PRINT ' 
3340 PRINT ' 
3330 PRINT ' 
33AO PRINT ■ 
3370 F-RINT ' 
3380 PRINT " 
3390 FRINT ' 
3400 PRINT ■ 
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42O0 PR: 
4210 pr; 
4220 PRi 
42SO pr: 
4240 PR 



NT -NKfthhhhhhhhhfehhhMvNNNhNnNMV 
NT "h 



Su*epmge26 



SUPER PUZZLE 



Prenez grand plaisir a reconstituer ce magnlftque puz- 
zle, il ravira vos mirettes. 






Chantal GUILLOT 



Mode d'emploi : 

les indicalions necessaires sonl dans li 



; i 



■ iii 



30 gosub4200 

50 P=0:Tl=0:restore5010 

60 dimV(3,12>.CH(105>.TU10> 

tOO pol efcFFIO, t :color0,6.3, 1 

120 X=20:Y=200 

130 gosubl50 

140 goto200 

150 ' *** GRILLE III* 

152 plot20. 200. 100, 160,0 

154 for I=0to8: 1 i ne20+ 12* I , 200, 20+ 12* I , 44 , 3: newt 

155 forI=Otol3: 1 me20, 200-12* 1 . 1 14, 200-12*1 , 3:ne* t 

156 for I=oto30: 1 ine2l+I *3. 200, 21+1 *3, 40,0: next 
137 forl=0to51: 1 met 9, 201-3*1 . 1 16. 201-3* 1 ,0:next 
15B N=8: tor 1 = 1 to 13: output I.N, 210-12* I. 2: if I=9thenN- 



utputchr*(64+I> . 1 2 + 1 2* 1 , 210, 2: i 



■xt 



200 



MENU 

205 screenl30, 150. 1 10,60 

210 col or 0,0, 3. 1 : plot 120. 90. 1 10. B4, 1 :plot 122. S8. 106 
. BO. 0: plot 27. 40,80. 35, 1: plot 28. 39, 78. 33. 3 

212 Un«27,30, 106.3':'. 1 

213 'or 1 = 1 to 4: 1 ine27+I6*I. 30.27+16*1.6, 1 :ntxt 

214 plot 142. 210.80, 40. 1 1 pi ot 143, 209, 78. 38,0 

215 linel77,210. 177, 170, 1 

216 colorO, 6. 3. 1 

220 output"* MENU *",14B,85,2 
230 outpuf'TIRAGE 1", 124.66,1 

232 outpuf'POSE PUZZLE 2", 124.56.1 
234 output "POSE RESERVE 3", 124,46.1 
236 outpuf'REPRISE PUZZLE 4". 124,36.1 

239 output' 'REPRISE RESERVE 5", 124,26,1 

240 outpuf'MODELE 6", 124, 16.1 
230 output "RESERVE" ,4B. 38. 2 

255 tor 1 = 1 to5: output I. 15+16*1, 14, 2i next 

260 output "PIECE". ia2.205,2ioutput"EN", 190. 19S,2sou 
tpuf'MAIN", IBS, 1B5, 2 

270 output "£££ PUZZLE £££",50.230.1 

275 clsiprinfA VOUS DE JDUER" 

280 tone97,300: tone 131.150: tonel 10, 150i tone97.300: t 
onel3l , 150; tone I 10. 150 1 tone97, 300: tonel 31 . 150: tonel 1 
0, 150:tone97,215 

300 ' = = = ====0PTI0N= = = = = « = 

310 QPMmstr*! 1 ) iDP=val <0P*) : i f OP- lor OP '6thengoto3 



312 if MD=lthengosubl50;MD=0:goBubl300 

313 if '.'=lthengoto315 
" ifT 104th*ngosub35O 



715 



:1s 



320 onOPgosub3000, 2000, 2500. 2200. 2700, 1000 

330 toneBS, 100: tone85. 140:goto310 

350 <orl:=ltol04:i*TU:)»0thenh -104: neKtireturn 

360 ne; t : gota50O 

400 print "PAS DE PleCE"ir«turn 

500 ■==== FIN ===== 

510 screen 120, 90, 109. 84: cl si 

520 print" BRA V " 

530 outpufVOUS AVEZ PLACE TOUT 

ES LES PIECES". 123, 70, 3 

535 pause?: els 

540 outpuf'AVEZ-vOUS VERIFIE St L 

E PUZZLE EST CQRRECTEflENT 

RECONSTITUE ""' . 1 25. 85, 7 

545 output "a/N", 183.3 

550 A»*tnstrS(l>:l f A»="o"thenc J s: pen 3: pr int" ALORS 

<3 ' EST PARFAI T" : pr 1 nt l pr 1 n t " HECTOR VOUS 

FELICITE ":pnnt:print" AU REVOIR" :pause3: pen 

552 i fA«="n"thenV=l:clsO:gota200 
354 goto550 

1000 '« AFF MODELE == 

1001 ifCH(Z)«150thenreturn 

1002 restoreSOlO 
1004 MD=I:V«0 
1010 X«20:Y=200 

1030 Tl-Tl + lnf Tl 104thenT 1=0: return 

1040 gosubl20O 

1050 X=X+12 

1060 if X' 110thenY = Y-12: X = 20 

1080 gotolO'O 

1200 * ROUTINE AFF 

1210 far I=0to2:forJ=0taU 

1220 readVd.J) 

1230 pole63936+int ( X/4) +1- (Y+l-J ) *64.Vtl. J) 

1240 ner:t . 

1250 return 

1300 ' === REAFF PUZZLE «== 

1320 fori >ltol04 

1330 ifCHI) ) = landCH(l > = 104thenqosubl40i"> 

1340 ne::t 

1400 rctsttireSOOO+lOtl 

1410 Y = 200-12t(int ( ICHll l-D/B) ) 

1420 X=8+ <CH(h l -B»int < 'CH(M -II /8> )*12 

1430 gosubl200 

1450 return 

1500 • PLOT EFF T I RAGE 

1502 plot 153. 199, 18. 18. 2: plot 154, 198. 16, 16. 3 

1505 return 

2000 " ■ = = POSE PUZZLE ---- 

2010 ifCHtZl 150thengosub400;return 

2030 cist input"COORDQNNEES"iftP* 

2033 i fRP«-"th«no.ota20S0 

2060 M*«ld*(RP», 1. l) :M=asc<A*)-64:ifM lorfi 9thenta 

207O X-B-12*rl 

2080 BS = <nid»tRF«.2> :N = val <BS) : ifN lorN 1 Tthentone-f. 
0. 100:goto2050 
2090 Y=212-N*12 
2095 L=M+8* IN- I) 




A suivre : 

En ratson de la longueur 
tnhabitueile clu tistint 
nous passetons ce pro 
gramme en deux lois 



2097 return 

2100 lfT(L) Othenclsipr mt'PLACE DCCUFEE" i tone 1 10, 
BO: tone 148. 100: pause. 5: goto2040 

2103 CH(Z)=L;T<L>=: 

2150 f or I*0to2; forj=0tol 1 ipol e67936 + int (X/41 + 1-64* ( 
Y+l-J: .VU.Ji in«xt, 

2160 gosubl500:cls 

2180 return 

2200 ' —REPRISE PUZZLE— 

2210 ifCH(Z)=150thenprint"FIECE NOn POSEE" : return 

2220 gosub2050 

2230 l f T (L) =0thengosub400: tone85.50: tone85. 50:goto2 
220 

2240 plotX, Y, 12, 12,3:plotX+l, Y-l, 11 , 1 1 , 0: fori =0to3 
:plotX+3tK, Y,0:plotX, Y-711 . 3 : ne:: t 

2250 Z=T<L) 

2260 CH<Z)=150:T(L)=0 

2290 gosub3200: els 

2290 return 

2500 ' ===PDSE R£5ERVE==== 

2310 if CHI2J : : 150thengosub400: return 

2520 P-P+li ifP 5thenpnnt"PLUS DE PLACE" :P=5: return 

2521 inpufOUELLE CASE" j RP«:RP=val <RP«> i l f RP lorfiP > 
Sthencls: tonel 10.60: got o252l 

2522 L-104+RP 

2525 if T(L> -.Othenpnnf CASE GCCUPEE" : goto2521 

2530 Y=2B:X-12+16»RP 

2540 restore5000+10*Z 

2550 gosubl200 

2360 CH<Z)=L 

2570 T(L)»Z 

23B0 go*ubl500icls 

2590 return 

2700 * «= REPRISE RESERVE = = = - 

2720 ifCHIZ)«lSOthenpnnf PIECE NON POSEE" : return 

2725 ifP-Othenprmf RESERVE VIDE" : tonel4B. 100: tone9 
7. BO I pause. 5 1 return 

2730 inpufOUELLE CASE" ; RP»| F;F -v«l (RP*) : l f RP lorRP" 
3thenctsigoto2730 

2735 L-104+RP 

2750 if T(L»-OthenclsjprinfCASE VIDE"* tone! 10, SOi to 
nel4B, 100: p*use.5:goto2730 

2770 Z=T<L) 

27B0 re«tore5000+Z*10 

2790 Y-28: X-»12+16*RP 

2800 plotX.Y, 12, 12,3 

2805 CH<Z)*130:T(L>=0lP=P-l 

2B10 gosub3200:cls 

2830 return 

30O0 •«=■« = = TIRAGE =»= ==== 

3002 if T>104thengoto3300 

3005 ifCH(Z>=150thenprint"PIECE NON POSEE" :pause. 5: 

3030 T=T+1: 1 f T= 105thengoto3300 

3050 Z=int <rnd (1 , t05) ) 

3060 ifCH(Z)' 0thengoto3050 

3080 CH(Z)=150 

3100 gosub3200 

3110 return 

3200 ' AFF PIECE TIREE 

3210 gosublSOO 

3220 R=5000+I0*Z:restoreR 

3230 X=156lY»196 

3240 go«ubl200 

3230 return 

3300 '====FIN PARTIE 

3310 print "PLUS DE PIECE" : tonel48. lOO: tonel 10, 100: t 
oneB5, tOO: tone71. IOOi : tone 148. 20O 

3320 return 

3500 color6,6,6.6 

3510 plot 15.220,115,210.2: plot 17. 218, 21 1.2"6,0:plot 
19.216,207.202, 1 : plot 21 , 214, 203, 198, 

3520 color6, I,0,3tscra<m23.210, 195. 190: return 

3600 plot30,33, 140, 15,3 

3610 output "Appuyez sur une bouch*" , 53, 30, 1 
3620 AS^instrS ( 1 ) 



MODE D'EMPLOI 



3630 elm 
4000 ' * 

4010 Mip 

4020 gosub3500 

4030 output"* REGLE DU JEU "",70,210,3 

4040 print : print : print "CE JEU VQUS FERMET DE RECONS 
TI- TUER UN PUZZLE DE 104 PIECES SUR LA GRILLE DE 
FINIE A L'ECRAN" 

4050 pnnt:print"LORSQUE VOUS AVEZ TIRE UNE PIECE ( 
1I.V0US DEVEZ CHOISIR OU VOUS LA POSEZ (2=PUZZLE OU 
3=RESERVE> " 

4060 prlntsprint "ENSUITE VOUS INDIQUEREZ LES CODRDO 
NNEES (Exi A12> SUR LE PUZZLE OU LA CASE DE RESERVE ( 
ET RETURN)" 

4061 gosub3600 

4070 print:print:pnnf'VOUS POUVEZ A TOUT INSTANT R 
E PRENDRE UNE PIECE DU PUZZLE OU DE LA RESERVE (S 
I VOUS N'EN AVEZPAS D' AUTRE EN MAIN) FOUR LA DE-FLAC 
ER OU LA F'LACER" 

4OB0 printjprir,t"VOUS POU'.'EZ CON5ULTEP LE MODELE AU 
TANT DE FOIS QUE VOUS VOULEZ. DES QUE VOUS COMMANDEZ 

UNE NDU- VELLE ACTION, LE MODELE S'EFFACE ET LE FUZZ 
LE QUE VOUS AVEZ EN FART IE RECQNSTITUE se reaffich 



4090 output "BON COURAGE ET .. 
ENCE 120.50. 1 

4091 0.OSLID3600 



.40.6 



:output"F'ATI 



4 10 



upe:. 



4200 •»« PRESENTATION 

4210 col or6, 1.0,3 
4220 outpulchr * (80) . I8i 

.2:outputchr« (90J . 1 20, 1' 
utputchr* 176) . 100, -0. 2: i 

421 1 pause] : soun04. 14 

(1.Y1, X2-1 



6-2O0 

1 l«90andYl«l lothengoto4240 
tputchr* IBO) ,X1,V1, Oi *l = «l- 

tputcnr»i9'>).xi, yi.Z 
X2»100andY2»l I ::'triengoto425i:i 
tputChrt (B5' .'.... 



X4: 120thenX4= 



4250 if X3= 1 IOandY3-l 10thengoto4 260 

4253 output chri (90) . X3, Y3,0l X7=X7-2: i t X3 1 10th 
I10sY3-Y3-2 

4255 outputchrt 190) . X3. Y7, 7 

4 260 i f )f4=120andY4=l 1 0thengoto4270 

4 26 7 outputchr»<90> .X4,Y4,0:X4=X4> 
t20lY4-Y4+2 

4265 outputchr»(90) , X4, Y4, 1 

427ij i ( X5= 1 30andY5= I 1 Othengoto42BO 

4273 outputchr»(76) . X5, Y5.0: XS-X5+2: if X5: 130thenX5= 
130: Y5"Y5+2 

4273 outputchr»(76>,X5,Y5,3 

4280 if X6=140andY6=110thengoto4290 

4283 outputehr»<69),X6, Y6.0: X6=X6*2: i f X6 140tnenX6= 
140:Y6-Y6-2 

4285 outputchr*<69) , X6, Y6.2 

42B9 goto4230 

4290 sound0,4096 

4291 p*4:C=l 

4292 forX = lto230stepP: Y»X: 1 ineX. 0,230, Y, C: ne* t : f orY 
= tto230stepP: X = 240-Y: 1 1 ne230, Y, X, 230, C: next 

4293 forX-230tolstep-P: Y=X:lineX, 230,0, Y,C: next: for 
Y-230tolstep-P: X-240-Y: I ineO, Y, X,0,C:nent 

4294 P=P+5:C=C+1: if P>10thengoto4300: el segoto4292 
4300 plotBO. 175, 77,20,3:output"M.T. M0UT0N",B3, 170, 

1 ; output " vous propose" , 82, 140, 1 

4320 tonel 10. 200: tonel 31 ,300: tonel 31 . 167: tone 124, 17 
7: tonel 10, 200 1 tone6 3,698: tone63,698: toneBO, 530: pause 
. 13 

4321 tonel 10.200: tone 13 1.504: tone 131, 167: tone 124, 17 
7: tonel 31 ,167: tone! 10, 400: tonel 10, 400: tonel 24, 354 

4330 return 

5000 *=« DONNEES POKE -« 

3010 dat»2S2.255, 173, 13, 13, 15, 15, 13, 173. 173, 175, 15, 
235,255.42,0,0,0,0.0.0,42. 170. 170,235,233,0,0,0,0,0, 
0,0, 168, 170, 170 

3020 dat»255.255.0.0,0,0,0,0,2.10,170, 166,255,255, 1 
70,0,0,0,0,0,0,0, 10, 1 70, 255, 253. 2, 10, B. 0,0, 0,0, B, B, 1 


5030 data255, 255, 0,0, 0,0, 0,0, 0,0, 0,0, 255, 255, 0.0,0, 
0, I 2B, 128,0.2.2, 168,255,255,0,0. 16B, 1 38, 10, 10,0, 32, 1 
60, 170 

5040 data255.253. 160, 160, 170,0,0.0,0.0, 10,2,255,255 
,2,10,10,42, 160,0.0.0,0,0,255,255,0,0,0,0,0,0,0,0,0, 
12B 

5050 data255,255, 170, 160, 160.0,32,32.0.32,32. 170.23 
5.233,42,42.42, 1 60. 1 2B , O, 0, 0, 0, 10,255,255,0,0,0,2,42 
.0,0,0.0.0 

5060 data255,255, 128,0,0,0,0,0,0,0, 128.0,235,255, 17 
0, 160, 128, 128.0,0,0,136, 170,42,255,255.170. 170, 170, 1 
70. 16B, 168, 16B, 170,42,32 

5070 data255,255, 10,2,2,2,2, 130, 170,2,0,0,253.253, 1 
26,0,0,0, 128, 170. 128, 128, 12B. 128,255.255,2.0,0,0. 10. 
10. 170, 10, 10, 10 

5080 data255, 255, 160,0,0,0,32,32.0,0,0, 160,255. 255, 
170, 40, B, 0,40, 0,0,0,0, 10,255,255,234,234,224. 192. 192 
. 1^2. 192. 192, 192,224 

5090 datalS, IS. 15. 15, 15, 15, 15, 143, 143,47, 15, 15, 10,0 
, 0, 0, 0, O, O, 0, 10, 0.0,0,12B, 0,0, 0,0, 0,0,0, 128, 0,0,0 

5100 data2, 2, 2, 42,0,0, 0,0,2, 10, B, 168,170,0,0,0,0,0, 
0,0,0,0,0,0, 10, 170, 170, 168, 168,0,0,0,0,0,0,0 

51 10 dataO, 10, 42, 42, 170, 168, 128, 0,0. 12B, 128, 128, 168 
,32,0,0,2,2, 10, 168, 16B, 170, 170,2, 170, 16B, 0,0,0,0,0, 2 
, 10, 10,2.42 

5120 data2, 2, 129, 128, 16B, 168, 168, 160, 160.0,0,0,0,0, 
0,0.42,42, 170, 170, 170,42,42,170, 160,0,0,0,0,0,0, 10, I 
0,0,0,2 

3130 data 170, 40,40,8,0,0,0,0,0, 0,0,0,0,0,0,0,0,0, 12 
B. 128, 12B, 128, I 60. 160, 0, 0, 160, 160, O, 0, 10, 10. 10. 1". 10 
, 42 

5140 dataO.0,42.42,42, 16B, 16B, 168,40.0,0,0,0,0,0.0, 
0.4 2.42, 10,0,0,0, 160, 160,0,0,0,0,0,0.0,32, 32,40, 1 70 

5150 data42,2,0,0,0, 128, 160, 128,0,0.0,0, 128,0, 128, 1 
28, I 2B, 168, 170, 170,40,40,40,42, 10, 130, 2,0,0,2,0,0, 1 2 
8, 128, 128, 160 

5160 data 160. 168, 169,40,40, 170, 170, 170, 170. 170, 170, 
170, 10,10,0,0.0, 130,2.2,42,42,42, 170,234,234,232,232 
,272,274,224, 192, 192, 192,232,234 

5170 datal5. 15, 13, 15, 15, 143, 173, 175, 175, 175, 173, 175 
,0,0,0,0,0,2, 10, 10, 170, 170, 170, 170,0,0, 169, 16B, 160, 1 
60. 129, 128,0,0,2,2 

5180 data 160, 42, 42, 42, 42, 10,2,2, 2, 128, 128, 160, 0,0, 1 
28, 160, 160, 16B, 168, 170, 170, 170, 170, 170, 2, 2, 2, 170, 170 
, 170, 170, 170,170, 170, 170, 162 

5190 dataO.0,0,0,0,0,42,42, 170, 170, 130,0,0,0,0,0,0, 
0,0, 160, 170, 10,2,0, 16B, 160, 12B. 168, 168, 16B, 170, 170, 1 
70, 170, 160, 128 

5200 data2,2,2,2, 10, 10, 10, 10, 10, 170, 170, 170, 170, 168 
. 168. 168. 168. 168, 12B, 128, 128,0,0,0, 10, 10, 170, 170, 170 
, 170, 170, 170, 170. 168,166, 128 

5210 dataO, 12B, 160, 170, 170, 170, 170, 170, 170, 170, 170, 
170 



5212 datal70, 170, 170, 170,170. 170,, 170, 170, 170, 170, 17 
O, 170 

5220 dataO, 0,0,0, 10, 10, 10, 42, 170, 170, 170, 170, 168, 16 
B, 160, 160, 128,0,0.0,0,2,2,2, 170, 170, 170, 170, 170, 170, 
16B, 40,40, 32,0,0 

5230 data!2B, 170, 170, 170, 170, 10, 10,0,0,0,0. 12B.42, I 
. . -".0.0,0, 160. 160. 170, 160, 160. 160, 129. 12B. 0,2 
, 10,10, 10, 10, 10 

5240 data 170, 170, 170, 170, 170,170,170, 170,32,32,0,0, 
170,170.170, 170. 170. 170, 170,0,0,0, 160. 128.234. 274. 27 
4.274.234.234,234,272,224,224,224,234 

5250 d*ta47, 15.47. 175,15. 15. 15, 15. 15. 15. 15, 15, 160, 1 
2B,'>, 2, 2, 2. 10,0,0,0,0,0.2, 10, 10.42,32, 160, 160. 168, 16 
8, 16B. 168, 168 

3260 data 160, 160. 128, 126,0.0.2. 2.2,2, 10, 10, 170, 10, 1 
O, 10, 10,42. 40,40. 168, 160, 160. 128. 160, 160, 16'.', 160, I 2B 
.0, 0,0, 42, 2, 2, 

5270 dataO.O. 0,0. 0,0,0,0, 0,0, 160. 160,0.0,0.0,0,0,16 
0, 160, 160, 166. 170. 170. 128, 126,0,0.0,0,0,0,0, 10,42, 17 

528':- datal70, 170. 170. 160. 160, 160, 128. 128. 129. 160, 17 
0, 170, 10, 10, 10, 170, 170. 170, 170, 170, 170. I 70, 1 70, 1 70, 1 
28, 128.0.0,0,2,2, 10. 10,10.42,42 



4243 out 

100: Y2«Y: 
4245 outputenrsta: 



A SUIVRE... 



JUMPMAN 



Pour quitter notre monde hostile et rejoindre sa fusee, 
un petit homme vert habile grimpeur. devra semer 
maints poursuivants. 



Mode d'emploi : 

Les regies sont incluses. 



TI99 BASIC ETENDU 

L23 



PiEN c 

ootfpTe 



2 ! »»»#»««»««»: 

4A t. JOYSTICK ' 

» »«.■--», 

HRISTOPHE 



■ ■»■* * TI-99/ 
t, EXTENDED BASIC 
HNHMttHMHW 




Chnstophe GODEREAUX 



VIE=4 



X3>23S 



40 CALL CLEAR : 
30 CALL MAGNIFY O 
60 CALL COLOR (6.7 
ALL COLORd. 16.2) 
70 CALL SCREEN<2) 

BO CALL CHAR(132. "0301010101FFB83322FFOO 
00G0000000C0B0B0B0B0FFB95522FF000OO000O0 
00"! 

90 DIM 0P(16> .H0P(16).V0Pd6) 
100 RANDOMIZE 
110 I»-"D" t! GOSUB 1210 
12U GDSUB 490 
1 50 GOSU& 950 

140 CALL CHARC72. "0I0307OF0F0C0COF0F0FOE 
OE 1 F3C787BO0B0COEOE0606OE0EOEOEOEOF0783C 
3C"! 

130 CALL COL0R(2.5.2) 
160 CA=-2 : : H=B 
170 VT-0 s: CAR1-1 ( .- BC-2 
IBO SCORE-0 ii BONUS- 130 
190 GOSUB 1330 
200 GOSUB 1380 
210 DISPLAY AT(3.26)t"0OO"- 
220 DISPLAY AT < 3. 2) SI ZE (1 ) i "4" 
230 • 

240 • MMtDE PLACEMENT »« II 

230 ! 

260 CALL J0YST(2.X.Y) 
270 CALL KEY<2.X1.5> 
280 CALL POSITION l«l 

AND X-4 OR X3<12 AND X = -4 THEN X-0 
LL MOTIONmi. 0,0) 

290 ON Xl/9*ABS(X)/4tABS(V)»l GOTO 350.3 
40. 390, 390. 720. 340.390.3*0 
300 CA-X/-2 

310 CALL PATTERN mi.98+CA> 
520 GOSUB 920 
330 GOTO 260 

340 CALL PATTERNmi, I08-X/2):! CALL MOT I 
0Nmi.0.X-1.3):i CALL SOUND( 10. -3.0) ) i 6 
OTO 300 

350 GOSUB 920 M CALL MOT ION (# 1 . O. O) 1 1 G 
OTO 260 
360 ' 

370 ' ftH**NSAUTWH*»N 
380 ' 

390 CALL SOUND (200. 300. 5. -2.5,300,3) 
400 H1=0 :: H=S n H3= ( -ABS ( X) *4> J1 
410 CALL PATTERNmi. 114+CA) 
420 IF X3<40 AND X«-4 OR X3210 AND X»4 
THEN X-0 

430 CALL MOTIONmi. -H.X-1.23)!! GOSUB 92 
O 

440 Hl-Hl+1 :! IF HI-4 THEN H-0 
430 IF H1=6*H3 THEN H--7 
460 IF HK10+H3 THEN GOTO 430 
470 CALL MOTIONmi. O. X/2) i i CALL POSITIO 
NiHl.YT.x3) :s CALL L0CATE(»l,COL,X3)!: C 
ALL PATTERNmi. 9B+CA) is GOTO 320 
480 ' 

490 ' NIVEAU DE DIFFICULTE 
500 ! 

SIO PRINT RPT*<"[ ".28) 

320 FDR I-l TO 20 :: PRINT " I " t TAB (28) ! " 
E" tl NEXT I 

530 DISPLAY AT<5. 101SIZEI 10) : "JUMPMAN" : 
: DISPLAY AT (7. O) I RPT« ( " t " . 2B) : I PRINT R 
PT»C'C".2B) 

540 DISPLAY AT(1I.9)SIZE(9>; "1 AMATEUK" 
550 DISPLAY AT ( 16. 9) SI IE U6> I "2 PROFESS" 
"□NNEL" 



560 DISPLAY AT(21.9)SIZE(13 



570 CALL KEY (3. 

580 CALL SOUND < 

THEN 630 

590 IF U=49 OR U=50 THEN CAR2=*U-49 ELSE 

370 

600 IF VIE-4 THEN CALL CLEAR ! i RETURN 

610 CALL HCHAR(21. 11.32. 5) I : CALL HCHAR ( 

11,11,32, 10) 1 1 CALL HCHAR (16. 1 1.32. 18) 

620 VIE-4 ii RETURN 

630 CALL DELSPRITE(ALL);: CALL CLEAR 

640 PRINT " ICtCCCECCCC 

CA B"M«&"ENTOT[ 
C I C [ C r [ [ [ [ t " 

650 PRINT :: i :::::; : 
660 FOR 1=1 TO 5O0 t: NEXT I 
670 PRINT : : : : i : ! i : : s : : : 
6B0 END 
690 ! 

70O ' BMONTEE ET DESCENTE* 
710 ! 

720 CALL MOTIONmi .0,0) 
730 CA2— 6 :i YY-Y it ER-0 
740 CALL PDSITIONml, Y3.X3) 



):: IF JK-0 THEN 1110 

1120 CALL MOTIONmi. 0. 0) :: CALL LOCATE (* 

1.9.128)1! CALL S0UND(250.-3.2.130.2):: 

CALL DELSPRITEdtl) !! CALL DELSPRI TE (Nl ) : 

: FOR 1=1 TO 100 i: NEXT I 

1130 FOR 1=0 TO 24 l : CALL SOUND (-200. -7 

.1/3. 130.1/2): t CALL MOTION<#27,-2.0) l l 

NEXT I :: CALL DELSPRI TE (ALL) ■ 

1140 SC0RE-SC0RE+30 i: DISPLAY AT(3.2B~L 

EN (STR4 (SCORE >> ) J SCORE 

1130 IF SCORE^=B0NUS THEN VIE=VIE*1 !! B 

0NUS=B0NUS*150 :: DISPLAY AT (3. ) SI ZE < 2 ) 



X3/8>+2.GC) 



CALL GCHAR 



IF GC 



IINT(Y3/8)-Y/2*l .INT 
< >40 THEN 320 

750 CALL L0CATEmi,Y3.INT(X3/8>»8+4> 
760 CALL PATTERN (»1. 130+CA2) i I CA2— CA2 
770 CALL MOTIONmi, -Y/l. 1.0) 
780 IF VY— V THEN ER-40-5GN ( Y) ELSE ER-0 
790 CALL C0INCmi.C0L-(40*SGN(Y) >+ER***S 
BN(Y),X3.B.3.CQI>! t IF COI — 1 THEN CALL 
MOTIONmi. 0,0) ii GOTO 830 
BOO CALL SOUND! 10, -5. 9,200.0,300. 9) 
810 GOSUB 920 
820 CALL J0YST(2.X,Y>|| IF YOO THEN 760 

ELSE CALL MOTIONmi, 0.0)il GOTO 810 
830 CALL SOUND dO. 1000.0) - 
B40 C0L-C0L-140«SGN(V) 1+ER 
830 CALL PATTERNmi, 124) , 
B60 CALL LOCATE (»1. COL. INT(X3/B) •8*4) 
870 CALL POSITIONmi.YS.LM: IF Y3<Y4 TH 
EN SCORE-SCORE+10 M Y4-Y5-28 II DISPLAY 

AT(3.28-LEN(STR«(SC0RE)) ) i SCORE 
BBO GOSUB 920 si IF SCORE >=BONUS THEN VI 
E=VIE+1 !i B0NUS=B0NUS*200 :: DISPLAY AT 
(3.0)SIZE<2):VIE 
890 IF Y3<20 THEN JO*© 
900 CA-2S i i GOTO 2.0 
910 CALL MOTIONmi . O. O) i i RETURN 
920 CALL COINCIALL.CODn IF COI-0 THEN 
RETURN 

930 GOTD 1760 
940 ■ 

930 I »»»«»»«DECOR»*ttlllt»» 
960 ! 
970 FOR I»9 TO 24 STEP 5 



1.91.32) 



NEXT 1 



980 CALL HCHAR(4. 1,90,32) 

990 CALL VCHAR(3,2.90) I I CALL VCHAR(4,10 

.40,3) 

1000 CALL VCHARI3. 1.90)1 I CALL VCHARC3.6 

,90)s: CALL HCHAR (2, 1 . 90. 6) i t CALL VCHAR 

(3.26.90)!! CALL VCHARf 3,32.90) • i CALL H 

CHAR(2.26.90.7) 

1010 CALL VCHAR(9.27.40,3)l! CALL VCHAR < 

14,5,40.3) ! ! CALL VCHAR i 19.27.40.5) 

1020 RETURN 

1030 * 

1040 ' mmiHIARR I A -u**n 

1050 ! 

1060 CA=-2 ! I UI-8 

[070 FOR 1=1 TO 8 

1080 CALL PATTERNmi. I32+UI):i UI=-UI 

1090 CALL SOUND (1 .-5.0.600.0) 

1100 NEXT I :i FOR 1=1 TO 100 :; NEXT I 

1110 CALL MOTIONmi, 0.6) I i CALL COINCmi 

. »27.5. Jl > i ! CALL S0UNDI-20O.700.7.600.7 



I ISO ' 

1190 ' «a*«CALL CHAR**** 

1200 ' 

1210 CALL CHAR(90, "FFFFFFBB44221 1FFFFB14 
2241B2442FF",40, "FF818181FFB1 Bl BI " . Bl . "0 
03C181818181B3C"> 

1220 CALL CHAR(96."0I0303030103O70F1712o 

3O3070C0C0EB0F040E08OC0E0F0C84C8OBOC06O6 
070" ) 

1230 CALL CHAR (108, "010F02070 10303030302 
O 1 O 1 03030303BOCOCOCOBOCOCOCOC040COCOCOCO 
COCO") 

1240 CALL CNARUOO. "010F02070103070F1332 
0101 03O6O6OEB0C0C0C0B0C0E0F0E84BC0C0E030 
3070") 

1230 CALL CHAR(104. "0103030301030303O302 
030303030303BOF040EOBOCOCOCOC040COCOCOCO 
COCO") 

1260 CALL CHAR(112. "010303030103070F 1712 
03031FlClOO08OFO4OE0B0COEOF0CB4CB0BeF070 
0000") 

1270 CALL CHARM16. "01OF020701O3070F1 332 
Oil 1 1F1COOO0BOCOCOCOBOCOEOFOEB4BCOC0F878 
0800" ) 

12SO CALL CHAR(120.RPT*I"0",14)1."0703FF8 
BBABABA8BFF"I,RPT*("0". 18) fc"F88BBBe8SS98F 
8") 

1290 CALL CHAR (60, "000000000001010701010 

101C3C7FFFF00000000000000C00OO00E0B9FCEF 
EFE") 

1300 CALL CHAR(136."0103030311131F070707 
020303070000C0E0E0E0C4E4FCF0F0F020E06070 
0000") 

1310 CALL CHAR(124. "0103030301 031F1 70707 
020303030307COEOEOEOCOEOFCF4F4F020E06060 
60F0") 

1320 CALL CHAR(92.RPT»("0". 16) ."03070F0E 
0£0FO703"S.RPT*("0' , .16>fc ,, COEOF0707OF0E0C0 

" ) 

1330 CALL CHAR(44.RPT»("0". 12) &"01010101 
O302030FO90F"t.RPT»("0". 1 2) fc"C04O4O40E020 
CALL HCHAR (I E0F09OF0") 

1340 CALL CHARU40, "010303031 1 1 31FO7O707 

12131FO0O00OCOE0E0EOC4E4FCFOF0F024E4FCU0 
OOOO" ) 

1150 CALL CHAR ( 128. "o00OO00l017F909090hF 
>008080O0ft090aBF6FF7FFFFF 



ii L— L :l NEXT J 

13O0 CALL SPRITE ( 

1310 RETURN 

1520 CALL SPRITE (« 1 <-J*BC»4 . 1 "2. 12,V0P(SP 

)-16.H0P(J)+43.0.3*SGN(VIT) *3"SGN ( VI T ) #1 

ND) 

1330 RETURN 

1340 ' 

1550 'COORDONEES DES SPRITES 

1560 ' 

1570 ON CAR1 GD5UB 1 680. 1690. 1 700. 1 7 10. 

730.32767.32767 

15B0 VE=169 ll HE=175 :: VIT-9 :: VIT=VI 

T*l 

1590 IF BC=2 THEN HE=14 

1600 FOR 1*1 TO B+IBC-2 

1610 aF'(I)=INT(RND--2l * 

1620 VOP(I)=VE l: IF VE=49 THEN VE=169 E 

LSE VE-VE-40 

1630 HOP(I)=OP(l: 

141 |i GOTO 1660 

1640 IF BC-2 THEN HE-HE-MO !: GOTO 



IF HE- 



THEN HE- 



1650 HE=HE-B7.3 : 
75 



IF HE= 



37.3 THEN HE= 



1660 NEXT 1 

1670 RETURN 

16B0 CL=6 ii CAL=92 :: RETURN 

1690 CL=9 :i CAL=44 i: RETURN 

1700 CL=11 ll CAL-120 li RETURN 

1710 CAR2-CAR2»1 : : IF CAR2 • 1 THEN CAR I < 

5 ELSE CAR1-1 

1720 GOTO 1370 

1730 BC=3 : 1 CAR1=! 

1740 GOTO 1370 

1750 ! 

1760 ' HM«»ttH*MORT#*NHttH* 

1770 ' 

1780 S0=INT(RND»200)+200 

1790 CALL MOTION(»l. 0.0) 

1B00 CALL FOSITIQNmi.OW.ER) t I CALL LOCA 

TEmi.COL.ER) t : CALL PATTERN (4 1 . 60) 

1B10 FOR 1-0 TO 30 :: CALL S0UND(-100C 



Z. I i 



NEXT I 



DISPLAY AT (3. <J) SI zee 



RETURN 



B«IMt5FRITES>tlllimMI 



. 

1380 

1390 

1400 CALL SPRITE<#27.72.5,* 

1410 C0L.Y4-169 

1420 1 =-1 

1430 SP-4 : : S0<=BC«4 

1440 FOR J-: TO 1 

1450 IF CAR2M OR CAR2 .-: 

1460 FOR 1=2 TO BC+l 

1470 CALL SPRITE t#SO+ 

P(SO).O.VIT) 

1480 S0=50-l :: NEXT I 

1490 SP=SP-I : : VI T= '.9. 5 -INT (RND*-2) 



1820 GOTO 

1830 CA=-2 

1B40 VIE=VIE-1 

:VIE 

1B30 IF VIE-0 THEN GOSUB 
40 j: CALL DELSPRITE(ALL) 

IB60 GOSUB 13B0 

1870 GOTO 230 

1B80 PL=2*4«BC- ( (COL-8) /40»BC) 

1890 FOR I-PL TO PL+BC-l : : CALL DELSPRI 
T£(»I!ll NEXT I it FOR 1=2 TO 1+BC tl CA 
LL DELSPRITEmi) t : NEXT 1 

1900 CALL SOUND(300.-7,0) : : CALL SPRITE* 
"28. 128, 16. COL. 1.0. 15) : : ZX = 60 

P0SITIQN(*2a,AS.I)F)ii IF DF>"E 
R-13 THEN CALL MOT ION («28. 0. O) : : GOSUB 1 
940 

1920 CALL SOUNDI400.SD+ZX, 15) i ! 2X=-ZK 
1930 GOTO 1910 

1940 IF ABS(ZX)=59 THEN CALL DELSPRlTEm 
28) S : GOTO 1830 
1950 FOR 1=1 TO 20 ii CALL SOUND ( • 



. I): 



NEXT I 



.0. 15! 



ER=240 



THEN GOSUB 1520 



. CAL . CL . VOP (SPI . HO 




1960 CALL DELSPRITEI' 

1970 CALL M0T10Nm28 

X=59 n GOTO 1910 

1980 RESTORE 2040 

1990 FOR 1=1 TO 8 

2000 READ FR.NOTE 

2010 CALL S0UND(FR-2O0.NOTE.0) 

2020 NEXT I 

2030 RETURN 

2040 DATA 1.247.2,220. .7. 175. .7. 175, 

7.2. 165 

2050 DATA 1.147.2. 165 

2060 DATA 101 .4 OO .200. 



7199 BASIC 
SIMPLE 



Suite de la page 24 



4260 I 
4270 t 

4280 I 
4290 f 









4S90 RETURN 

10000 CALL CLEAR 

10010 CALL SCREEN!-* 

10O2O PRINT "LA CHASSE EST F1NIE POUR TO 

10O30 PRINT i i! i i 

10040 PRINT "VOICI LE GRAPHIOUE DES PLAF 
ONDS DE TON ENTREPRI5E" : t : 
100SO FOR I«l TO 70O 
10O60 NEXT I 
10070 CALL CLEAR 
10080 ZSW>1000 
10090 FOR t-1 TO 22 
: .'1 ■ Pi- INT ZSW 
ZSU-ZSW-41 



K'l 



Nl ■ 



*«20 RETURN 




1430 REM IMMEUBLE 


1440 CALL CHAR 


ze. ■•FFBiaiaiaiaiHiBiFF" 


■)3'.' CALL CHAR 


121. "FFFFRFFFFrFFFFFFFF 


1464 CALL CQLORI1.2.5) 


i470 CALL COLOR i 12. 13.5) 


4U< ■ PRINT Tihh 


■lllnhnhh^lh^lhhhh^hnhh^lhhfl. 


300 PRINT fi 


HOTEL ••• I 


510 FOR I-l TC 


5 


520 PRINT "H 


vvvvw/vvvvvYvYyvvvy i 


530 PRINT "h 


VYV^tyvM'VvE'?' vyttyyv f 


540 PRINT "h 


yyv)li•yylr^yvtl^¥ YtVvvy * 



■ INT " O " 

10140 CALL VCHAftd. 7.124. 231 

10141 FOR I-B TO 31 

10142 CALL VCHARU. t.43.23) 

10143 NEXT I 

10150 CALL SCREEN121 

1O160 FOR 1=1 TO 23 

1017O IF I-C THEN 10300 

10160 HPAU)-INT(SC0RE<1 1/41 > 

101B1 IF HPA(I) 24 THEM 10230 

10190 HPSE(I)-24-HPAil I 

10200 CALL VCHAR(HP3E(I) . I »7 . 13.MPA( I ) i ■ 

10210 NEXT I 

10220 REM 

10230 PRINT " TU AS FAIT SAUTER MES TRAN 

S1ST0RES JE NE PEUX POINT AFFICHEfi LE RE 

SULTAT IL EST TROP BON" 

10300 FOR I-l TO 16 

; CALL COLORd . 15. 13) 



10303 


CALL COLOR (1,5. I) 


10310 


CALL KEY(O.WERT.ASXZ) 


10311 


IF A5XZ-0 THEN 10310 


10320 


CALL CLEAR 


1 033O 


CALL SCREEN(2) 


10340 


PRINT "UNE AUTRE PARTIE"!: 


10130 


INPUT R« 


10360 


IF Rt-"QUI" THEN 1 


10370 


CALL CLEOR 


10371 


FOR 1*1 TO 16 


10372 


CALL COLORd. 16.2) 


10373 


NEXT I 


103B0 


BOSUB 350 


1039O 


PRINT i t " GAME/OWER 




TAPER '/LEAR'! : 


10400 


FOR I- I TO 16 


10410 


CALL COLORd . 17-1.2! 


1042H 


C.Ai L COL OR (9, 1.21 


1 ■ "1 2 1 


CALL COLOR (1. 1,21 


10470 


CALL SOUND (10, 122. 1 1 


1044'' 


CALL COLORdO. 1,2) 


10430 


CALL SOUND' ! . !*: 10.91 


10460 


COLL COLOR 1 11. [.21 


10470 


NEXT I 


H<46-> 


GOTO 1040m 


■ 


CALL CLEAR 


' 


GOSliE. 12! 


20010 


f-F- INI ■■•••>•••••■••••••«.. 



. 



1 REGLES DU JEU" 






•JS. ■ 



B£fcTft'CE?*>EU*? 

rW'^E ? &TiOC€fc? 

NOM HOH w*i Hon , . 

^HON MOM E T piQij J 

2OOB0 PRINT " 1- ACHETEZ I 

S CHER IL EST PLUS IL VS RAPPQR' 

15 IL PEU w/S DEDUIRE PLUS DANS ' 

20O90 PRINT -LE CAS CONTRAIRE" i 

20100 PRINT » 2- ACHE1EZ DES HOMMEStDEU 

I VS 5ER0NE DEDU1T FAR OPERATION)"! 

KIN1 Al HI l I . . 
VS SERA DEDUIT PAR OPERATION)": 
20120 PRINT " 4->D!RIGER VS SUR L'IMMEU 
BLE GUI A CHANGER DE COULEUR ET TIRE2 FE 
U POUR VS RENDRE AU LIEU ■' : 
20130 FOR I-I TO 6BO0 
20140 NEXT I 
20150 CALL CLEAR 
20160 PRINT "..•...•......•............. 

20170 PRINT : 

20180 PRINT " 5- UNE MDISQN APPARAIT.CA 

PTUREZ LE »PLUS VI1E POSSIBLE LE FANTOME 

SINON IL PART' ) 

20190 PRINT " 6- FOUR LA CAPTURE APFUYE 

R SUR FEU VS VS TRANSFORMEZ EN LAZEft ET 

Au MOMENT DES1REZ REAPPUYER" 

2O2O0 PRINT " SUR FEU ET UN RAYON PARTIR 

A DU LASER FOUR DETRU1RE LE FANTOME (SI I 

L EST SUR LA TRAJECTHIRE) - 

20230 F'RINT " -POUR TOUTE DONNER AU CLA 

VIER LA TOUCHE ALPHA LOO VERS LE BAS ET 

POUR LA MANNETTE VERS LE HAUT"! 
20240 PRINT " -OUAND VS N'AUREZ PLUS DE 

LAZERS OU D'HOMMES VS POUR-RE Z REFA: 
05 ACHATS ET l£S PRIX SERONT" 
20250 PRINT " PLUS HAUT • ■ " 
2O260 FOR 1=1 TO 7000 
20270 NEXT I 
20280 CALL CLEAR 
;"T0 620 



TRANSASCII 



Vous etes coince dans un jeu d aveniure 7 La cunosite 
et remptoi.de ce programme vous apporteront peut- 
etre la solution. 

Franck FUZIOL 
Mode d emptoi : 

Si vous possedez lassembleur BIG MAC . tapez le fisting 1 Dans 
le cas contraire. tapez puis sauvegardez le listing 2 par BSAVE 
TRANSASCII- AS 4000 , LS 183 Ce programme transforme le 
cootenu de la memoire en caracteres ASCII et les affiche amsi que 
les adresses correspondantes Le principal interet dun tel pro- 
gramme est de donner un coup de pouce aux passionnes de jeux 
d'avenlure Pour cela. il vous suffit de 
1 -charger le jeu 

2-le bloquer par n importe quel moyen imeme un pomme ouverte- 
controle-reset) 

3-chargef TRANSASCII et le lancer 

Apres avoir charge TRANSASCII- ne pas oublier d initialiser l{(|{( 
par POKE 1013.76 POKE1014.0 POKEI015.64 afm de le rendre 
eniierement controtable sous BASIC La syntaxe est la suivante 

- (((((. adresse debut, adresse (in 

- si !*{{((( est seul. il prendra en compte les dermeres adresses tour- 
roes II est conseiHe de mettre TRANSASCII assez haul en memoire 
{$ 4000 par exemple) pour eviter I ecrasemenl des ieux Pour lancer 
le defilement, la barre d espacemenl doit etre appuyee puis relachee 
(apres un '((({( adresse debut, adresse fin' puis retour \ Pour stop- 
per le defilement : 

• un court instant, appuyez sor ESPACE le defilement sarrete ius 
qu'au relachement. 

- un long mslant. appuyez sur une louche quetconque Pour le re- 
lancer, appuyez sur ESPACE 

Les caracteres *"."*, I . , .J . sont remplaces par ' V Un 
"CTRL-C" arrete leffet de l (((((, mais pas le programme dans lequei 
il est eventuellement contenu 



« !• 

3 |« 

if* PAR F. FUZIOL 

7 |« 

B I* APPLE 11*. HE QU 1 

9 (• 

10 ,.« 

11 I 

12 | 

13 TXTPTt EP2 tee 

I< t 

IS CA.DE2 EP2 »CF 

14 CA.OEL EPZ 404 
17 SAUV.Y EPZ *D7 
It CFTEUR EPZ »EB 
If AM EPZ *EC 

20 tarn EPZ 4ED 

21 OES.B EPZ *EE 

22 DEB.H EPZ 4EF 

23 RELAIS EPZ 8F9 

24 A08.RE EPZ 9fA 

23 NOH.CA EPZ 4F8 

24 PART. 9 EPZ 4FC 
27 PART.H EPZ OFD 

29 FIN. « EPZ WE 
TV FIN. H EP2 OFF 

30 t 
21 | 

32 buffo, eou ocoio 

33 PRBYTE EOU OFDOA 

34 COUT EOU 4FDCD 
39 | 

34 t 

37 , 

38 |' P I IO aiMI I C PRINCIPAL ! 

39 , 



♦• I 

41 OR* 44040 

42 | 

43 |** -TEST POUR 4 SUNS ADRESSES-' 
« | 

43 LOT MOO 

44 DM <TXTPTR),Y 

47 CMP f«00 



DWACTERE DELIIilTATEUR AO 

R. KOUT (C.A.O i *,■)-»• 
I t 

I LOX £42C 

I STX CA.DEL 

I STX CA.0C2 

' LOX (400 

I STX SAUV.Y 

1 | 
I j**-ENU01 S0USPR06 TRANSFORMANT L ES CARA 

CTERES ADRESSE EN CH1FFRE HEX-** 



JSR SOUSPR 



67 

43 | 

44 i**-SAUVE6ARDE DES CARACTERES TRANSFORME 
S EN HEX <ADR. DEBUT)--. 

43 | 

44 LOX PART.B 
47 STX DEB.B 
49 LDX PART.H 
40 STX DEB.H 
7» I 

71 |**-CHAR6EHENT CARACTERE DELIMITATE!* AD 
R. FIN (C.A.O i RET. CHA , •!*>-«• 

72 | 

73 LDX £400 

74 STX CA.DEL 

73 LDX £43A 

74 STX CA.DE2 
77 INC SAUU.Y 
71 I 

7t i "-ENVOI SOUSPROG TRANSFORHANT LES CARA 

BO l 

81 JSR SOUSPR 

BZ I 

83 i**-SAUUEGARDE DES CARACTERES TRANSFW 
MES EN HEX (ADR. FlN>-«* 

84 t 

89 LDX PART.B 

84 STX F1N.B 

B7 LDX PART.H 

88 STX F1N.H 

89 ; 

90 j«. -ENVOI SOUSPROG TRANSFORMATION ASCII 




Une erreur s est glissee dans 
[erratum du programme Fast 
Boot Maker pour Apple. Voici 
la correction. Ne la tapez pas. 
elle est probablement truftee 
d'erreurs. Attendez (erratum 
de I'erratum de [erratum. 

• 390- 03 4C 04 03 



92 RETBAS JSR SUPRA 



1 LOT (*Q0 

f TOURNE LOA <TXTPTR) I 

I CMP £400 

> BEO RETOUR 
t CMP £43A 

I BEQ RETOUR 

i INC TXTPTR 

i LDX TXTPTR 

I CPX 1*00 

I BEO INCPRO 

I JNP TOURNE 

> INCPRO INC TXTPTR* I 
I JMP TOURNE 

» RETOUR RTS 



t 



112 |> SOUSPROG LECTURE ADRESSES ' 



114 | ■*- INITIAL I SAT ION-** 

117 | 

I IB SOUSPR LDX (404 

119 STX CPTEUR 

120 STX NOH.CA 
1ZI STX PART.B 

122 STX PART.H 

123 STX RELAIS 

124 LOT SAUU.Y 
123 DEY 



> RECHCA 1NY 

I LOA (TXTPTR) ,Y 

CMP CA.DEL 
BEO NOCATR 

I CMP CA.DEZ 

I BEO NOCATR 

I i 

I I* 



I PASSYN CMP £43A 

I BCC CAROK 

I CMP £441 

1 BCS PASSY2 



133 CAROK INX 





JMP RECHCA 


t*«-RAJ0UT DE DE". 


4 CAR. 


'• 


NOCATR 


STY SAUV.Y 




STX NOH.CA 




LDX £404 




STX CPTEUR 


BOUCL1 


DEY 




LOA (TXTPTR 




LOX NCM.CA 




CPX i »0Q 




BNE SAUT1 




LDA f430 



OEVANT LES ADRESSES < 



171 I** -TRANSFORMATION DES CAR. €N CHIFFR6 



S SBC E430 

■ JMP SAUT3 

1 SAUT2 SEC 

I ; 

I ;*«-PLACEMENT DU CH1FFRE 08TENU A SA PL 
ACE (C.A.D i UNITE, CENT. ETC> — • 



: i 1 .■:.■■ 

183 SAUT3 STA RELAIS 

184 LDX CPTEUR 
IBS CPX £43 



LDA PART.B 
LDX £400 
ADC RELAIS 



198 STA PART.B 

199 JMP SUITRA 

200 OPBAUN CLC 

201 LDA PART.B 

202 ADC RELAIS 

203 STA PART.B 

204 JMP SUITRA 

203 OPPAMA CLC 

204 CPX £402 

207 BEQ OPHAUN 

208 LDA PAIT.H 

209 UK iVOd 

214 AOC2 AOC RELAIS 

211 INX 

212 CPX £418 

213 BNE ADC2 

214 STA PART.H 
213 JMP SUITRA 



219 
220 | 
221 



LOA PART.H 
AOC RELAIS 

STA PART.H 



•-TEST POUR SAUOIR SI FIN!-. 

222 | 

223 SUITRA LOK NOH.CA 

224 CPX £404 
223 BEO SAUT4 
234 OtX NCM.CA 

227 SAUT4 DEC CPTEUR 

228 LOX CPTEUR 
CPX £448 



3 35 
231 



I FIN 
1 80UCL1 



237 ( 

238 i 

239 |**-SAUV€GAROE AORESSE DEBUT-" 

240 ; 

241 SUPRA LOA DEB.B 

242 STA AM 

243 LOA DEB.H' 

244 STA AOH 

243 JMP AFFICH 

244 i 

247 i**-ftJSE A JOUR DES AORESSES-'i 

248 | 

249 TESTAO INC A08 

230 LDX A08 

231 CPX C400 

232 BNE NOINC 

233 INC AOH 

234 NOINC STX AD8.RE 

233 , 

234 )**-TEST AFF1CHA6E ADRESSE-** 



25? ; 
256 



LOT £480 

lDX A08.RE 
CPX £441 

BEO AFFICH 



247 CPY £40 

246 BNE TOUR 

249 JMP BOUCLE 

270 | 

271 |**-AFFICHA6E ADRESSE-' 

272 i 

273 AFFICH LDA £'141 

274 JSR COUT 
2*5 LOA AOH 

27* JSR PREfTTE 

277 LDA A08 

278 JSR PRBYTE 



279 LDX £888 

280 LOA I'140 

281 1HPESP JSR COUT 

282 INX 

292 CPX £482 

284 BNE 1HPESP 

299 | 

284 |**-CHARGEHENT K A ET ENUOIT A COUT-. 

287 , 

288 BOUCLE LOT £488 

289 LOA IANl,i 

290 CMP £'140 
BCS ECR 



292 



CMP £-128 



293 BCC ECR 

294 LOA f 4BF 

299 ECR JSR COUT 

296 i 

297 |*. -TEST CLAVIER-** 
299 | 

299 RETARD LDX BUFFCL 

398 CPX C483 

381 BEO FIN2 

392 CPX £421 



383 [**-TEST POUR FIN OU PAS-.* 



348 CPX FIN. 8 

309 BEO ETUPRO 

311 JMP TESTAO 

311 ETUPRO LDX AOH. 

312 CPX F1N.H 

313 REB FIM2 

314 | 

319 ^'-RETOUR PW 084 W I8 : PRINCIPAL-** 
314 l 

317 JMP TESTAO 

318 FIN2 LOA EM41 
318 JSR COUT 
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-131 


















•4888 


41B3 


















4000- 


A4 


10 


81 


BJ 


Cf 


00 


FO 


2F 


40D3- 


UOJRTJ 


4008 


Cf 


3A 


Fl 


2A A2 


K 


B4 


04 


4888- 


(»F7) 


4410- 


84 


CF A2 


BO 


84 


D7 


?0 


34 


4414- 


(4CC) 


4818- 


49 


A4 


FC 


84 


EE 


A4 


FD 


84 


4018- 


(•AF) 


4828- 


EF A2 


88 


84 


94 A2 


3A 


HA 


4928- 


(493) 


4028- 


CF 


II 


D7 


70 


94 


40 


A4 


FC 


40 28- 


(»97) 


4038- 


04 


FE A4 


FD 


B4 


FF 


20 


08 


40 30- 


(«72) 


4030- 


41 


AO 


00 


81 


99 


C9 


00 


F8 


4038- 


(ion 


4040- 


14 


C» 


3A 


FO 


II 


F4 


BP 


A4 


4040- 


<»FF) 


4049- 


B8 


EO 


00 


Fl 


03 


4r 


38 


40 


4048- 


(8tC) 


4030- 


Ed 


HV 


4C 


38 


40 


40 


A2 


00 


4030- 


(«AA) 


4038- 


u 


E9 


B4 


FB 


B4 


FC 


B4 


FD 


4030- 


(Oil) 


4848- 


84 


F8 A4 


07 


88 


CO 


Bl 


Hfl 


4940- 


(943) 


*Qi8- 


C3 


04 


Fl 


71 


a 


TF 


FS 


ID 


4044- 


(•23) 


4470- 


C9 


3E 


ao 


13 


48 


48 


40 


LV 


4079- 




4878- 


3A 


98 


OF 


Cf 


41 


BO 


3 


4(3 


4079- 


(4F7) 


4Qfl_-- 


m 


40 


C9 


4/ 


90 


03 


48 


6H 


4080- 


(•13) 


4088- 


40 


EO 


40 


43 


40 


04 


0/ 


84 


4088- 


(«34) 


4899- 


F9 A2 


• 4 


84 


te 


■ 


Bl 


Hd 


4090- 


(491) 


4899- 


A4 


l-B 


FO 


II 


m 


12 


AV 


30 


4098- 


<4F4) 


40A0- 


r.v 


3A 


BO 


04 


38 


tv 


30 


4C 


40AO- 


<0C9) 


40AO- 


AD 


40 


38 


£? 


37 


83 


FO A4 


40A4- 


(•01) 


40B8- 


IB 


EO 


03 


BO 


• 4 


to 


01 


80 


4090- 


'•ED) 


40B8- 


IF 


IB 


to 


04 


Fl 


10 


A3 


FC 


4089- 


<«5A) 


40C0- 


A2 


00 


45 


F» 


til 


to 


IB 


DO 


40C0- 


<»F«) 


4DCB- 


F9 


83 


FC 


4C 


M 


40 


IB A3 


40C8- 


(•C5) 


4808- 


FC 


43 


FV 


83 


FC 


4L 


F4 


40 


40 08- 


<9CI) 


40D8- 


IB 


to 


02 


to 


II 


A3 


FD A2 


4009- 


(4EB) 


40E0- 


00 


43 


F9 


to 


bl 


10 


08 


F9 


40EO- 


(4A0) 


*0E8 


83 


fD 


4C 


F4 


40 


IB A3 


FD 


40E0- 


'•CD 


40FO- 


43 


► y 


M3 


FO A4 


FB 


to 


00 


40FI- 


<«39) 


5QFB- 


FO 


•7 


C4 


F9 


C4 


Fl 


A4 


tB 


40FB- 


(OAF) 


4100- 


to 


00 


Fl 


13 


4C 


93 


40 


44 


4100- 


C9BW 


4108- 


A3 


tE 


83 


tc 


A3 


a 


83 


ID 


4108- 


(889) 


4110- 


4L 


as 


41 


E4 


fcC 


A4 


tc 


to 


4110- 


'•98) 


4118- 


OC 


00 


02 


U 


to 


S6 


FA AO 


4MB- 


<«I3) 


4120- 


OD 


A4 


fA 


tc 


01 


FO 


OE 


ttt. 


4129- 


C9C93 


4128- 


aa 


t9 


20 


as 


FA 


ce 


CO 


08 


4128- 


(*8E> 


4130- 


bL 


LF 


*L 


30 


41 


AV 


■ 


20 


4130- 


'•44) 


4138- 


a 


FO A5 


tu 


^U 


DA 


FD 


AS 


4139- 


(•FA) 


4140- 


tL 


29 


M 


FO A2 


UU 


AV 


M 


4140- 


(440) 


4)48- 


M 


to 


>-0 


E8 


to 


02 


UU 


tB 


414B- 


(♦12) 


4130- 


M 


DO 


81 


tc 


(19 


AO 


UO 


H 


4150- 


'•221 


4 158- 


C9 


bU 


vo 


02 A9 


■J 


20 


to 


4 158- 


(400) 


4140- 


FD AE 


;o 


CO 


tJ 


un 


1-0 


irt 






4i*e- 


EO 


20 


DO 


F5 A4 


EC 


E4 


Ft 


4148- 


[9991 


4170- 


1-0 


03 


4C 


13 


41 


A4 


a 


t4 


4170- 


(442) 


417B- 


Fl 


^0 


03 


4L 


13 


41 


AV 


■ 


417B- 


'•34) 


4190- 


20 


a 


Fl 


40 














• 40 00 


41B3 
















• 



LELOGICIELDELASEMAINE 



SAGA D'ERE INFORM ATIQUE 
POUR ORIC 1 ETATMOS 



Huit meganons que nous vo- 
guons au travers des galaxies 
Huit meganons que |e resle 
immobile et glace dans ce cer- 
cueil cryogenique Huil mega- 
rions que je maudis ces mge- 
nieurs qui m'afftrmerent que 
conscience et froid ne peuvent 
coexisler Huit meganons que 
i attends cet instant. Ce lege' 
sifflement qui m annonce 
qu entm je pourrai vivre el puis 
mounr comme un homme et 
non plus rester glacon. atten- 
dant d'etre iete en pature a un 
verre de whisky geant Huil 
meganons Quel que soil 
cette duree que peul-eile si- 
gnifier pour le ndicule cerveau 
humam 9 Comme si nous 
etions capabies d apprehender 
des echelles aussi vastes que 
le megarion Autant essayer de 
memonser les qualre coordon- 
nees de chaque etoile de I uni- 
vers connu et de les reciter a 
I endtoit puis a I envers 

Que peut-il bien se passer 
pour quOrdiai 25 decide de 
but en blanc de me deconge- 
ler "> A moms qu il ne I ait pas 
choisi. que j'aie entm reussi a 
devellopper mes tacultes kynes- 
tesiques au-dela de mes es- 
poirs les plus tous Mais non 
huit meganons n arrangent pas 
la sante mentale d un observa- 
teur qualitie de troisieme 
degre L exploration doit conti- 
nuer. meme si la planele mere 
et tous ses habitants oni dis- 
paru. La vocation de lobserva- 
teur. le serment de lobserva- 
teur. I ideal de lobservateur 
Mots vides de sens et pourtant 
omnipresenls a I instant ou la 
vie animale va recouvrer ses 
droits 

Un systeme steliaire inconnu 
droit devanl. decceleration a 



vmgt liuil G. le boulot 
commence vraiment pour moi 
Le cocon anti-G me reiache 
petit a petit et du com de loeil 
)e dechiffre les colonnes de 
renseignemenls qui detilent sur 
les ecrans La tension qui 
m habitail en phase d approche 
me quitle tel les rats tuyant le 
navire en train de sombrer A 
tort datiieurs les gars du com 
ne semblenl pas commodes 
outre mesure et me somment 
de me rendre Bataille ou di- 
pipmatie, voila de quoi extra 
poler avant de prendre une de- 
cision par trop native 




De ce logiciel on ne pourra 
manquer de souligner son 
manque dattrait ,? prion m^is 
I oncien courageux voudra a'lei 
y voir et cest la quil sera en 
danger ! Des heures de pro- 
menades dans des quadranis 
desediques ou des rencontres 
peu amicales a resoudre cai- 
mement ou violemment. voila 
de quoi vous river a voire 
micro duranl quelques mors ' 
EI en plus vous etes sense 
aider des vaisseaux en de 
tresse. c est a due ne pas bou 
siller le voire au cours de 
combats stenles Bret a prali- 
quer d urgence en tong en 
large et en profondeur a 
grands coups dannees lu- 
miere 



PEPE LOUIS CONTRE LE GANG DES PUCES ! fTienU 



RESUME DES EPISODES lee 
PRECEDENTS : 

Jobard Tramolo et Pepe Louis se 
sont evades de Cuba sur un petit 
bateau de huit metres et its doivent 
reiomdre les Bahamas Mais en 
descendant a fond de cale Ms 
s apercoivent que I abbe Oesco- 
chons les a trahis ' En eltet les 
micro-ordmateurs prototypes de Jo- 
bard et Tramolo ont ete voles Pire 
encore, le bateau prend t eau 



15eme EPISODE UN TV- 
PHON LES PETITES MARION- 
NETTES I 

Se trouver en pleine nuit. en 
pleine mer dans un bateau plein 
deau est une situation pleine 
d'imprevu mais qui depasse la 
mesure Jack Tramolo, son sen- 
timent de colere passe, son un 
vieux cigare de sa poche et ral- 
lume 

- Pas de panique. Pepe Louis 
Ce nest qu'un teuilleton et je 
paneraismes dents du bonheur 
contre une prothese en porce- 
laine que nous allons nous en 
r.ortir 

Je ne demanderais qua le 
croire mais j'ai toujours eu le 
mal de mer et comme cest moi 
qui tient le camel de bord de 
cette aventure. je ne suis plus 
trop sur de mes reflexes 
Une porte claque brusquement 
et Jobard devale les huit mar- 
ches de lescalier qui rt'en 
compte que six, cest vous dire 
s'il va vite Lair du large la de- 
grise, ce qui est une lacon de 
parler car sa mine est plutot 
sombre pour ne pas dire vache- 
ment inquiete. 

- Quelqu'un a sabote le gouver 
nail ! Le bateau ne repond plus 
Cette tors cest le bouquet 

- Mes entants, je nous vois mal 
partis, et |'ai une petite envie de 
qerber qui |oue du piston dans 
mes intestins Le bateau coule 
nous n'avons plus de gouver - 
nail. pas de radio, pas de carte 
et rien pour ecoper 

Tramolo avale une enorme bouf- 



de fumee et la rejette par les 
naseaux On diratl un taureau 
avant I estocade II est tier et do- 
minateur 

- Aucun probleme, secne-l-il ' 
J'ai confiance et |e suis certain 
que nous allons trouver une so- 
lution 

Puis il seffondre en pleurant 
comme une madeleme et sort 
un hochet de sa poche en cuant 
"mother mother, don't let your 
intie boy r. 

La scene est poignante. pour ne 
pas dire emouvante encore 
qu'un peu bouleversante imagi- 
nez cet homme riche. puissant, 
adule. craint. respecte et chauve 
sanglotant comme un mome 
dans la cale dun navire en per- 
dition 

Touche par la grace. Jobard sort 
un mouchoir trempe de sa 
poche et vient essuyer les 
larmes de son camarade 

- Don't cry baby Jack Were 
gonna work it out ' 

C est incroyabie de voir a quel 
point les individus peuvent per- 
dre leur self-controte dans les si- 
tuations dramatiques Tiens. 
depuis deux episodes Tramolo 
et Jobard ont tendance a parier 
anglais N V Z'inquielez pas La 
tension nerveuse provoque des 
relachements dans le comporte- 
ment. mais pepe Louis est la 
pour redresser la barre 
Done, je remonte sur le pont et 
j'avise La mer est etrangement 
calme Cest a peine si Ion en- 
tend le doux feulement des 
bancs de sardines contre la 
coque Le ciel est Waterman 
L air est pesant Si | etais a volte 
place, i ouvncais la fenetre pour 
aerer : on sent comme un ma- 
laise qui se prepare 
La nostalgie empoigne mon 
coeur de vieux parisien Ouand 
revenai-ie enfin de mon ving- 
tieme arrondissement turner les 
antennes sur les toits ? Sur quel 
comptoir lointam pourrais-je (aire 
trebucher cent sous 7 Dans 
quelle galere me suis-ie done 
embarque alors que la resi- 
dence pour personnes agees de 



Memlmontant me tendait les 
bras ? 

Bon Faut pas se iaisser aller a 
la nostalgie Quelque part dans 
le Monde, on nous attend et 
cest pas le moment de flancher 
Pas question de terminer 
comme des boat-people de I m- 
lormatique Pepe Louis coule 
mais ne se rend pas 
Notre bateau prend sefieuse- 
mentdelagite. et je vois reappa- 
raltre mes deux compagnons 
dinfortune. (Cest beau On di- 
rait du Zola) 

- La cale est pleine ' C est 
loutu ' Nous allons demater ! 

- II ny a aucune bouee el pas 
de gilet de sauvetage. panique 
Steve 

Et brusquement. cest la tem- 
pete brutale. matlendue. sau- 
vage Les 33emes rugissants 
La foudre celeste. Le typhon de 
lenfer Ceux qui ont deja navi- 
gue savent a quel point ca vous 
tombe dessus rapidemenl : vous 
etes en train de vous faire bron- 
ze< tranquillement. vous vous 
baissez pour renouer un tacet 
de votre basquette. et quand 
vous relevez la tete.toc, ca y 
est. vous etes en plein dans 
loeil du cyclone 
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A VOS CONSOLES Tl 99/4 ba sic etendu disponible 

II. l ogo N° 2 disponible 

mini-memoire 



CONSOLES ET ACCCSSOIRES Tt 99 4 
Micro oidlnaieur Tl 99MA Pal 

Modulaleui Secam France 

Moaulaieur Peritel 

CObie liaison magneto cassettes 

Magneto cossertes Texas Instruments 

Magneto cassettes lonsav ■■' Compteur el cOble 

Imprimante Seikosctw GP 50 A 

Impnmonte SetkosctM GP 500 

Imprimante boson RXBO trie I ion/ traction 

Machine a eenre Bromei EP 44 & memoire 

Interlace paioiieie exterieure pour Tl 99 

Interlace sene exterieure pour Brother pour Tl 99 1 090 f Li 

Manetle de jeux Super Joy d ventouse avec 

interlace speciale supportant 2 manettes (mai) 

Monette Quick Shot 11 a ventouse Til blague 

orec atiaptateur pour 2 manettes (mai) 

Manetle de jeux Texas USA. to poire 

PROGRAM MATVON 

Extended Bosk manuel trancois 

Super extended basic graph manuel trongats 

Extension memoire 32K exterieure 

Tl logo n° 2 en trancois livroble avhl (Module) 

Mini memoire livrable avril (Module) 

K7 EPSIIOH SOFTWARE POUR Tl 99 BASIC tTENDU 



1 100 F ! 
500 f i : 
500 F [] 

95 F 
595 1 
370 F I 

1 350 F a 

25O0F : 

4150F 

2390 F 

1090F I.) 



195 F 



800F □ 
1 200 F n 
1340F Li 



20F[^ 

120 Fl -j 

260F 



95 F i . 

150F n 



Lunar landet 95 F (1 Lunar Jumper 

Solar system 120 Fi: Sum Games 

• K7 lunar lander 2 + 2 K7 rensemtole 
K7 HEBDOGICIEIS SOFTWARE POUR Tl 99 
M* 3 rubis sacre Bask etendu 
H* 4 6 leux Oonl Dark Crystal Bask etendu 
N" 2 12 few oonl Rotand Garros Basic etendu 

MODULES TEXAS ORGANISATION 

Geslion de tkMers 260 F i "1 Gesnon de roppotts 375 f U 

Gestton pnvee 360 F n 

MODULES FUNWARE POUR Tl 99/4 

Rabbfl RoH ; Dnyma Demon . St mck Ambulance 
L ensemble 400 F I i 

MODULES ROMOX POUR Tl 99 

Princess and Irog t20Fii Anteater 120F 

Rotoftatders lOOFi) henpecked 100F 

MODULES EDUCATION 
Addrtion/Suostroction 

n louj 147 F Addmon Cannon 147 FU 

Mission moms 147 F (1 Drmion/D*moli!-ofi 147 F 

Meteor Multiplkation 147 F !] MuttipUcatton 1 147FD 

Beginning Grammar U7 f I ! Early Leanung 250 F L : 

147 F a 




disponible avril. 
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MODULES LOtSRS 



Connectfour 147 F L, Jeux video 2 147FC 

Jeuxretrol 147 F ! : Theattock 147FC 

Jeuxretro2 147FLi Othello 206 F 1" 

invaders 206 F D Munch Man 206 F L 

Corwarks 147 f : : Chasseaux wimpis 147 F C 

Soccer 250 FL_ Video Chess 450 FC 

Zero zap 147 F 



250 F 
350 F 

250 F 
350 F 



LOT r 1 INDISPENSABLE 
BASIC ETENDU in 



ii jeux sur Tl 99 *■ 1 



MODULES JEUX 

Parsec 

Adventure pirate 

Munch mobile 

Buck rogers 

Retour du pirate 250 F [ I 

Mash 250 F ; : 

Microsuraeon 250 F P 

Hopper 250 F I : 

Jaw breaker 250 F I, 

MODULES ATARISOR POUR 

Moon patrol 219 F 

Jungle hunt 219 FG 

Pole Position 21 F 

Protector II 250 F [ I 



tunnel ot doom 

Moonmme 

Micro surgeon 

Pooeye 

Demon attack 

Burger time 

Hopper 

star neck 

Treasure island 

TI99 
Defender 
Picnic Paranoia 
Donkey kong 



350 F 
250 F 
250 F 

400 F 
250 FD 

250 F 
250 FC 

250 F 
250 F 

219F 
250 F 
250FO 

250 F . 



Cm pnn loni IMIcatlts *r peuvcnr Mr* modifies sont preens 
Prodwrs disponibles dam In llmlle <M nos Slocks en mogasm 
Pamcipotion oui Imis oe porl el asipMIDai 



ie pour les eupMi rions a 



LA REGIE A CALCU1 

65'67 Dd Saint -Germain. 75005 PARIS 

tel 375 68 88 TMei ETRAV 2J0064 F 



MINI-MEMOIRE 

Ce module ne se conteme pas de vous ollnr 4 Kode memoire 

RAM (oilmen lee par pile) permettani la souvegarde des 

piogrommes et donnees lorsque vous eteignez toidinoteur 

II o oussi ; 

• 4 Ko de memoire morte (ROM) et 6 Ko de memoiie matte 

gropmque (G - ROM) conienonl des ulilitaires Ires inteies 

son is 

- occes possible d I'exiensmn 32 K en Tl basic ; 
-cnaigemeni de programmes -obje is ecnis en assembler, 
soil sui mini-m6moiie. soil sui exiension 32 K. 
-utilisation de PEEK et POKE, oppel de sous-programmes 
hobitue Mement non occes sibles. 

- prooiamme oe recheicne d'erreurs (Easy Bug - Debug) 
Le module avec manuel + manuel ossembieur sur mini 
memoiie 895 FL 



MICRO-ECOLE MATRA MICRO-ECOLE MATRA. 




M6mone 32 K + 2 guides 
PROMOTION ECOLE : 795 F D 



Caracteristiques lechjiiques 

- Micropiocesseui 13803 

- 32 Ko de memoue ; 

16 Ko RAM dont 8 Ko utilisateur 

16Ko ROM compienani le basic Microsoft avec 

(Miteur, 1'edileui /asse ruble ui Alice 

- Aif ichage 16 x 32. 25 x 40. 25 x 80 (lignes x 
colonnes) 

- Definition graphique 160 x 125. 320 x 250 
(sous assembleui) 

Connectabie sur loul televiseur pentel 
(adaptateui antenne non el blanc en option) 

- Sortie impnmante 

-Entree-sortie pour lecteur/enregistreur de 
programmes 

- Extension a 24 Ko RAM utilisateur. en option 




Guide Alice IMcouvrezLe Basic- Guide Alice d'ins 
irucbons de ledtteur assembleui - Alice version 
coffret - Lecieur/eniegistreur de programmes 
Alice - Emplacement pour lextension 16 Ko (non 
hvree avec le co(frei) - 4 cassettes logictels - Cable 
petite) el cable de faccotdement au lecieui/ 
enregisireur de programmes - Cable d'aiimentauon 



PROMOTION ECOLE : 1S95 FD 
Garantie 1 an - Nous demander la liste des logiciels. jeux et librairies. , 



